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Memoria Subito 
pronto il disco virtuale 

Caratteri Un generatore 
multifunzionale 

Education L’istruttore 
autore per l’insegnante 

Mouse Gestione ottimale 


Software File Maker Plus 

Excel Riclassificazione 
bilanci e nota spese 

Paint Un pennello super 
per dipingere in libertà 

Trucchi Le scorciatoie 
per lavorare meglio 
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Dysan 

♦ Somebody has to he better than 
everybody else. 

* Qualcuno deve essere migliore di chiunque altro 









Fucina di font. Creare nuovi font è facile e veloce, e la visua¬ 
lizzazione sullo schermo Hi-Res rende agevole e divertente il 
loro disegno e le eventuali correzioni. I set di caratteri cosi rea¬ 
lizzati possono essere usati in ogni programma. 


Turbo Pascal per Macintosh. Chi programma in Pascal ac¬ 
coglierà con interesse la notizia che il Turbo Pascal della Bor¬ 
land, ricco di un grande successo in campo Ms-DOS, esiste fi¬ 
nalmente anche in versione Macintosh. Valutiamolo insieme. 


Excel. Sul potente spreadsheet Excel è possibile realizzare 
una miniera di applicazioni. In questo numero di Applicando ne 
vediamo due: una per riclassificare i bilanci aziendali e una (a 
pag. 48) per fare una nota spese professionale. 


Education. Comincia su Applicando la pubblicazione di un pro¬ 
getto volto alla realizzazione di un courseware avanzato per in¬ 
segnanti. In questo numero la presentazione del sistema autore 
SAIP e uno sguardo ai concetti strutturali del Pascal. 


Super Painter, pag. 62 


Mac World expo di Rotterdam, pag. 46 


Mouse per Apple II. Molti ormai posseggono il mouse, ma 
pochi lo sfruttano al meglio. Ecco un programma che vi aiuterà, 
con una serie di dimostrativi, a fare prodezze con la gestione a 
icone e il magico topino. 


6 - Applichi 67 - Omnis 3: applicazioni 

10 - Applicosa 89 - Applettere 

52 - FreeSoftware per Mac 122 - Disk Service 


Un'antenna in giardino. Epressamente dedicato al radio- 
amatore che vuole costruire da sé un’antenna, questo program¬ 
ma (sia per Macintosh che per Apple II) lo aiuta a determinare 
qual è la gamma di frequenze ottimale. 


File Maker Plus. Qualcosa più di un database, per quanto ric¬ 
co e potente sia, File Maker Plus riesce a sfruttare le potenzia¬ 
lità grafiche e gestionali del Macintosh, aggiungendo a potenza 
agilità e gradevolezza estetica. 


File Maker Plus, pag. 27 


Parole chiave in campo inverso. Semplice e in 
macchina, questa utility consente di evidenziare in un listato Ap¬ 
plesoft la presenza di parole chiave, stampandole in campo in¬ 
verso. In fase di progettazione e debugging si rivela preziosa. 


Segreti e trucchetti. E' scritto sul manuale, ma non ricordia¬ 
mo più dove; l'abbiamo scoperto un giorno per caso, ma l'abbia¬ 
mo presto scordato: è un trucco, l'uso segreto di un tasto, la 
doppia faccia di un comando, un’idea inedita, una scorciatoia.... 


Un Mac per il Mec. E' giunto al primo MacWorld expo euro¬ 
peo l'intero mercato americano orbitante attorno al Macintosh: 
non più landa sperduta, il Mec conquista un grande ruolo com¬ 
merciale e produttivo. E, naturalmente, non mancano le novità. 


Un disco virtuale. Interamente in linguaggio macchina, questa 
routine consente la realizzazione di una Ram Disk di 16 K in am¬ 
biente DOS 3.3, da trattare esattamente come un drive inse¬ 
rito nello slot 5, con tutti i soliti comandi disco. 


Font foundry, pag. 19 


Super Painter. Disegnare con MacPaint comporta degli inne¬ 
gabili limiti; di una maggiore scorrevolezza, per esempio, di un 
miglior sguardo d'insieme si sente la mancanza. Ecco un pro¬ 
gramma, integrabile con MacPaint, che senz'altro vi piacerà. 


sommario 


Scanner per Mac. Sul video compaiono fotografie, disegni e 
progetti, da impaginare, manipolare, ingrandire, tagliare... Lo 
consente lo scanner, ultimo arrivato sulla scrivania ai chi edita 
col computer. Vediamo quali modelli offre il mercato italiano. 


























Nuova generazione di CAD per Macintosh 

SPACE EDIT 

é uno dei più potenti pacchetti professionali di 
DISEGNO TRIDIMENSIONALE disponibile 
su MACINTOSH per Architetti, Arredatori, Designers, 

Scenografi, Disegnatori industriali e Geometri. 

La possibilità di eseguire la quotatura automatica, 
di realizzare prospettive ed assonometrie da ogni punto 
di vista con rimozione delle linee nascoste, di lavorare su 
8 disegni sovrapposti con una biblioteca di elementi in 3D 
predisegnati, fanno di Space Edit un programma di altissimo 
livello professionale, rigorosamente preciso e semplice da usare. 

Pilota direttamente ogni tipo di plotter fino al formato AO. 




PROFESSIONAL CAD 
e MICRO CAD SYSTEM 

due tra i più potenti pacchetti di CAD/CAM 
bidimensionali per progettisti meccanici, 
con caratteristiche paragonabili a sistemi 
decisamente più costosi. La loro potenza unita 
alla facilità d'uso rendono il MACINTOSH 
una soluzione veramente unica nel settore. 


Entrambi i sistemi presentano caratteristiche 
avanzate quali: quotatura automatica con 
j tolleranze, zoom infinito, pilotaggio di plotter 
formato AO; dispongono inoltre di moduli 
CAM per il collegamento diretto con 
macchine a controllo numerico. 
PROFESSIONAL CAD in particolare 
esegue le proiezioni ortogonali ed 
isometriche delle viste di lavoro e la 
visualizzazione tridimensionale del disegno. 
MICRO CAD é un compromesso ideale tra 
costo e prestazioni professionali. 


Questi programmi sono disponibili presso i migliori APPLE CENTER. Distribuiti ed assistiti in esclusiva in tutta Italia da: 




Computer 


saI. Via Chiapponi,42 - 29100 PIACENZA - Tel. 0523/20626 
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Applicando cambia faccia. Dopo quattro anni di floppy 
disk da cinque pollici, anche la copertina della rivista si è a- 
deguata a quello che ormai sta diventando lo standard delle 
memorie magnetiche. Prima Macintosh, poi Apple II e ora 
il IlGS, utilizzano i microfloppy da tre pollici e mezzo, più 
capaci, più affidabili e più facili da conservare. 

Ancora una volta è stata la Apple a dettare uno standard. 
Non sulla base della propria forza commerciale ma sempli¬ 
cemente perla sua capacità di comprendere le esigenze del¬ 
l'utenza. Questo grazie anche al continuo feedback tra gli u- 
tilizzatori e i progettisti. Un feedback che si crea anche, e 
soprattutto, attraverso riviste come Applicando. 

E che il nostro mercato sia particolarmente pronto a rece¬ 
pire le evoluzioni più recenti della società di Cupertino lo si 
vede dalla massiccia presenza di distributori italiani al pri¬ 
mo MacWorld europeo tenuto a Rotterdam dove, sottovo¬ 
ce, si è sentito parlare di contatti e contratti per la distribu¬ 
zione sul territorio nazionale di prodotti stranieri. 

Per esempio, gli scanner, periferiche che hanno creato in 
poco tempo un preciso settore di mercato a cui Applicando 
ha dedicato la copertina di questo numero analizzando i cin¬ 
que modelli disponibili in Italia. O, ancora, il nuovo databa¬ 
se FileMaker Plus, disponibile in edizione italiana, per fini¬ 
re con il Turbo Pascal, probabilmente la più potente versio¬ 
ne di questo linguaggio che ha trionfato nel mondo Ms- 
Dos. 

E per l'Apple II? Continua intanto la promozione sconto 
sull'acquisto del IlGS offerta da Applicando e, inoltre, le pa¬ 
gine del prossimo numero ospiteranno una ricca rassegna 
di quello che sta succedendo nel mercato americano. Final¬ 
mente qualcosa sembra muoversi. 

Stefano Benvenuti 



UNIONE STAMPA 
PERIODICA ITALIANA 
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A proposito di 
interfaccia umana 

Il rapporto "user-frien¬ 
dly” che ha reso famoso 
Macintosh non è nato dal¬ 
la fantasia di qualche in¬ 
gegnere. Alle spalle delle 
varie icone, finestre, 
mouse e ascensori ci so¬ 
no venti anni di investi¬ 
menti in studi e ricerche. 
Bruce Tognazzini della 
Apple di Cupertino è 
l'uomo che più di tutti 
ha seguito le strategie di 
questo nuovo approccio 
con il personal computer 
e durante l’Apple Univer¬ 
sity Consortium europeo 
tenutosi a Pisa ha raccon¬ 
tato come si è sviluppato 
questo rapporto e le ten¬ 
denze future di questa fi¬ 
losofia. 

"Perché quell'interfac- 
cia funziona? Perché è... 
familiare; intuitiva; faci¬ 
le da ricordare. E' più faci¬ 
le imparare delle applica¬ 
zioni se sono basate su 
cose familiari. Ad esem¬ 
pio, quasi tutti hanno uti¬ 
lizzato un tavolo da lavo¬ 
ro, quindi, il fatto di uti¬ 
lizzare il computer da ta¬ 
volo come la metafora di 
base per il Macintosh ha 
funzionato molto bene. 

"Ma che dire dell’aspet¬ 
to intuitivo? Cari Jung, 
uno studente di Freud che 
viveva appena un po' a 
nord di qua, divideva il 
mondo tra persone sensi¬ 
tive e intuitive.I sensiti¬ 
vi vivono qui e ora. So¬ 
no molto consapevoli di 
tutto ciò che accade intor¬ 
no a loro. Quando si reca¬ 
no al lavoro in macchi¬ 
na, notano gli uccelli, 
gli alberi, le colline in 
fiore. Gli intuitivi si a- 
straggono completamen¬ 
te da tutto ciò che li cir¬ 
conda. Potrebbero guida¬ 
re la macchina lungo la 
via Appia senza neppure 
rendersi conto che il la¬ 
stricato è un po’ dissesta¬ 
to. Vivono la loro realtà 
interiore, una complessa 
miscela di passato, pre¬ 



sente e futuro. Per strada, 
guidando la macchina è 
più facile che pensino al¬ 
la collisione delle falde 
tettoniche piuttosto che 
all'auto che procede in 
senso opposto, con cui ri¬ 
schiano uno scontro fron¬ 
tale. Spesso, investono 
qualche povera mucca. 

"Cosa vogliono gli in¬ 
tuitivi da un'interfaccia? 
Ben poco. Erano alquan¬ 
to contenti delle interfac¬ 
ce umane di un tempo, 
con qualche menù, un 
messaggio di errore qua e 
là, forse un paio di bip- 
bip... Le interfacce di un 
tempo erano, in genere, 
dei labirinti, delle buie 
grotte piene di stanzine 
con videate per immissio¬ 
ne dei dati. Quando si era 
entrati in una stanza biso¬ 
gnava proseguire, immet¬ 
tendo dati, finché ci si 
imbatteva in un altro me¬ 
nù. Gli intuitivi si co¬ 
struivano rapidamente dei 
modelli concettuali inter¬ 
ni, delle mappe dell'am¬ 
biente. Fatta la mappa, 
potevano svolazzare su e 
giù per il programma sen¬ 
za alcun problema. 

"I sensitivi, invece, 
non costruiscono modelli 
concettuali. Sono beata¬ 
mente al di fuori delle 
mappe. Vogliono che sia 
qualcun altro a accendere 
la luce. Adorano le inter¬ 
facce in cui si può vedere 
quel che si sta facendo. A- 
mano i display grafici ad 
alta risoluzione - che fan¬ 
no lavorare gli occhi. Gli 
piace il suono, gli piace 
essere fisicamente coin¬ 
volti dall'uso del compu¬ 
ter - la manipolazione di¬ 
retta. Cosa cercano i sen¬ 
sitivi in un'interfaccia? 
Cercano una realtà artifi¬ 
ciale, un'interfaccia basa¬ 
ta su una metafora reale, 
comportamentale, come 
quella del computer da ta¬ 
volo, che è la prima inter¬ 
faccia della storia, che sia 
stata fatta proprio per i 
sensitivi. La adorano. 


"A questo punto una 
domanda: se i sensitivi 
non sono produttivi con 
le interfacce a menù, per¬ 
ché la maggioranza delle 
interfacce sono proprio a 
menù? Perché i program¬ 
matori amano avere il 
controllo della situazio¬ 
ne. Detestano lasciarlo ai 
semplici utenti. Un altro 
problema è che i progetti¬ 
sti di programmi sono re¬ 
almente convinti di fare 
un favore agli utente, de¬ 
cidendo tutto al posto lo¬ 
ro. E' un po' come se un 
fruttivendolostabilissear- 
bitrariamente che, marte¬ 
dì prossimo, tutti i clien¬ 
ti vorranno cavoli, a me¬ 
renda. 

"Secondo un test effet¬ 
tuato su oltre due milio¬ 
ni di persone, il 75% del¬ 
la popolazione è costitui¬ 
to da sensitivi. D'altro 
canto, abbiamo riscontra¬ 
to che più del 90% dei 
nostri programmatori so¬ 
no intuitivi. Vi ricordate 
gli intuitivi? Sono quelli 
che mettono sotto le 
mucche andando al lavo¬ 
ro. Vi ricordate che tipo 
di interfaccia è accettabile 
per gli intuitivi? Buie 
grotte, un menù qua e là, 
un modello concettuale 


complicato e invisibile. I 
programmatori hanno 
sempre creato delle inter¬ 
facce per se stessi. 

"Noi della Apple abbia¬ 
mo tentato di creare un 
computer che risulti natu¬ 
rale e permetta un effetti¬ 
vo aumento di produttivi¬ 
tà agli utenti di ogni ti¬ 
po. Ci siamo concentrati 
sull’utente sensitivo ri¬ 
scontrando che, in tal mo¬ 
do, si veniva incontro an¬ 
che alle esigenze dell'in¬ 
tuitivo. Essenzialmente, 
abbiamo tentato di realiz¬ 
zare un'interfaccia che 
pur essendo ricca di con¬ 
tenuto, liberasse la creati¬ 
vità umana. 

"Per finire parlerò per 
un paio di minuti del fu¬ 
turo. La Apple si è recen¬ 
temente dotata di un nuo¬ 
vo strumento, del valore 
di circa 195 miliardi di li¬ 
re, denominato Cray. Lo 
useremo per simulare in¬ 
teri sistemi di computer, 
in modo da tornare a quel¬ 
la specie di gioco che è 
stato realizzato per il Ma¬ 
cintosh e vedere cos'altro 
si può ideare. Mi piace¬ 
rebbe che riuscissimo a 
costruire un vero compu¬ 
ter portatile, come lo in¬ 
tendo io, cioè un compu- 
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ter con un CD-Rom di 
controllo a lettura e scrit¬ 
tura, un pannello piatto 
sensibile al tatto formato 
A4 e la capacità di con¬ 
vertire la mia scrittura a 
mano in chiari caratteri. 
Ciò mi permetterebbe di 
usarlo sul treno, senza 
cercare di far scorrere un 
mouse su e giù per la 
mia gamba, o di portarlo 
a una riunione di affari 
senza l'imbarazzo di do- 
verdigitarerumorosamen- 
te su una tastiera...” 

MacUnix 

come passaporto 

Circa 100 le società 
rappresentate nel primo 
MacWorld Expo euro¬ 
peo. Nel prestigioso elen¬ 
co dei leader del mercato 
delle terze parti dedicato 
alla macchina di Cuperti- 
no c'era anche la List srl 
in rappresentanza dell’Ita¬ 
lia. La società pisana è 
l'unico esempio italiano 
di terza parte del mercato 
Macintosh che possa con¬ 
tare su distributori all’e¬ 
stero. "Uno stand al 
MacWorld Expo di San 
Francisco nel gennaio 
1986 e una campagna 
pubblicitaria su Unix- 
World, la rivista dedicata 
all’utenza del mondo U¬ 


nix, ci ha permesso una 
serie di contatti al di fuo¬ 
ri del territorio naziona¬ 
le.” Così Andrea Simo- 
nelli, 33 anni, laurea in 
scienze deH'informazione 
allUniversità di Pisa, re¬ 
sponsabile marketing e 
dei rapporti con l'estero 
della List srl, spiega co¬ 
me la società pisana è ar¬ 
rivata a ottenere contratti 
di distribuzione con paesi 
al di fuori dell’Italia. Il 
motivo dominante, però, 
èrappresentatodalprodot- 
to sviluppato dalla socie¬ 
tà pisana rivolto a un set¬ 
tore ben specifico destina¬ 
to a poche ma complesse 
organizzazioni: il mondo 
Unix. Lo Unix applicato 
al Macintosh sembra 
però un discorso in antici¬ 
po rispetto alle attuali po¬ 
tenzialità della macchina 
di Cupertino. 

"Senza dubbio siamo 
partiti in anticipo", spie¬ 
ga Simonelli. "Abbiamo 
presentato la soluzione U- 
nix applicata al Macinto¬ 
sh allo SMAU del 1985 
iniziando la distribuzione 
del prodotto nel gennaio 
1986. Allora il Macinto¬ 
sh era visto come un ela¬ 
boratore personale e ba¬ 
sta. Oggi, e ormai da di¬ 
versi mesi, il Desktop 


Communications nell' 
ambito di questa macchi¬ 
na è sulla bocca di tutti e 
allora diventa anche per 
noi più semplice propor¬ 
re questo tipo di soluzio¬ 
ne. Per il momento sono 
due i prodotti della List: 
il primo permette appun¬ 
to di interfacciare il Ma¬ 
cintosh a dei sistemi U- 
nix abbinando le caratteri¬ 
stiche dei personal, e in 
particolare di quell’inter¬ 
faccia User Friendly pro¬ 
pria del Macintosh, alle 
possibilità dei minicom¬ 
puter o mainframe. Il se¬ 
condo lega invece le mac¬ 
chine di Cupertino a si¬ 
stemi Digital che lavora¬ 
no con sistema VMS. 

"Il discorso VMS è 
molto più semplice del 
discorso Unix", spiega 
Simonelli, "l’area di uten¬ 
za è delimitata e facilita 
di conseguenza i proble¬ 
mi da affrontare. Per 
quanto riguarda Unix, 
quello prodotto in casa 
Apple legato alle poten¬ 
zialità del Macintosh II 
faciliterà le soluzioni: sa¬ 
rà possibile lavorare in 
ambiente Unix con dei 
Macintosh come unico 
hardware dove il Mac II 
fungerà da Server per i 
terminali composti da 


Enzo Landonio nuovo 
Direttore Vendite della 
Apple Computer Italia. 

Mac SE o da Macintosh 
Plus. Nell'attesa la List 
continua la sua campa¬ 
gna con l'estero: Inghil¬ 
terra e Sicob di Parigi so¬ 
no i prossimi obiettivi, 
senza per questo esclude¬ 
re il nostro SMAU. 

Nuove soluzioni 

Quarantanni, lombar¬ 
do, con un lungo e presti¬ 
gioso curriculum, Enzo 
Landonio è il nuovo diret¬ 
tore vendite della Apple 
Computer Italia. L’Ibm, 
dal 1969 al 1972, la Sin¬ 
ger fino al 1977, respon¬ 
sabile marketing della 
Ncr per il successivo 
quinquennio, e responsa¬ 
bile grandi clienti alla 
Burroughs-Memorexfino 
a oggi, Enzo Landonio 
sarà particolarmente im¬ 
pegnato nel processo in 
corso di diversificazione, 
miglioramento e specia¬ 
lizzazione della rete di 
vendita della filiale italia¬ 
na, della società di Cuper¬ 
tino, con particolare at¬ 
tenzione allo sviluppo e 
promozione di soluzioni 
innovative basate sulla 
tecnologia di Macintosh 
e destinate alla grande e 
media utenza. 

Lo stand della pisana 
List srl al MacWorld EXpo 
europeo tenutosi il mese 
scorso a Rotterdam. 








SUPER 




PER II, //e, Ile 
MACINTOSH 



H. Peckam-W. Ellis Jr-E. Lodi: Il Basic e gli Ap¬ 
ple Il in pratica. Questo volume accompagna 
gradualmente l'utente, al quale non è richie¬ 
sta alcuna conoscenza matematica o infor¬ 
matica di base, dai primi approcci alla tastie¬ 
ra fino alla completa padronanza del compu¬ 
ter e della programmazione. E' il lettore a deci¬ 
dere se passare al successivo capitolo o ritor¬ 
nare ad approfondire quanto gli è stato appe¬ 
na spiegato. Pagg. 310, lire 28.000. 



W. Ettlin: Il Multiplan per il Macintosh. Oltre 
la pura e semplice descrizione del funziona¬ 
mento del foglio elettronico, introduce \utente 
all'uso di uno strumento di lavoro integrato 
che permette di svolgere- una quantità inso¬ 
spettabile di attività diverse in ogni area del la¬ 
voro d'ufficio o nella professione: modifiche, ta¬ 
gli, spostamenti, rimontaggi, dal bilancio di 
una società al campionato di calcio. Pagg. 
210, lire 26.000. 



G. Mainis: Il Manuale ProDOS. Il ProDOS co¬ 
stituisce un significativo passo avanti rispet¬ 
to al diffuso ma ormai un po' invecchiato 
DOS 3.3. Questo manuale introduce ai nume¬ 
rosi e complessi aspetti del ProDOS, dedican¬ 
do particolare attenzione alla struttura ad al¬ 
bero delle directory, alla compatibilità con il 
DOS 3.3 e con il SOS e alla programmazione 
in Basic Applesoft sotto ProDOS. Pagg. 
200, lire 25.000. 



R. Person. Le meraviglie dell'animazione con 
gli Apple IL La creazione di animazioni realisti¬ 
che e uno degli obiettivi più ambiziosi per un 
utente di personal computer. Il lettore viene 
guidato alla realizzazione di alcune potenti uti¬ 
lity che gii consentiranno di produrre animazio¬ 
ni personalizzate. Alcuni programmi completi, 
inoltre, dimostrano come l'applicazione presen¬ 
tata consenta la realizzazione di giochi a livel¬ 
lo professionale. Pagg. 280, lire 24.000. 


Genitori 
nell’era 
del computer 




P. Scharf: Genitori nell'era del computer. In 

che modo è possibile servirsi del computer nel¬ 
l'educazione dei figli? In che misura il computer 
cambierà la scuola? Qual è il software più 
adatto a stimolare la creatività del bambino? 
A queste e altre domande Scharf dà risposte 
basate sulla sua esperienza in famiglia (4 figli 
maniaci del computer] e nelle scuole statuni¬ 
tensi. Pagg. 256, lire 19.000. 


COMPUTER 

GRAPHICS 

CORSO DI 
PROGRAMMAZIONE 
STEVEN HARRINGTON 



McGraw-Hill 


S. Harrington: Computer Graphics. L'approc¬ 
cio seguito da Harrington rende accessibile il li¬ 
bro a un pubblico con basi matematiche ele¬ 
mentari e concatenando la spiegazione dei 
vari algoritmi in modo da portare il lettore an¬ 
che alla realizzazione di un package grafico 
ben costruito e basato su concetti dii standar¬ 
dizzazione delle funzioni. Pagg. 520, lire 
39.000. 


PASCAL 

GUIDA PER 
PROGRAMMATORI 
OLIVIER LECARME 
JEAN-LOUJS NEBUT 



McGraw-Hill 


O. Lecarme-J.L. Nebut: Pascal. Guida per 
programmatori, li libro può essere usato per 
un corso intermedio da coloro che scrivono pro- 
rammi più avanzati, ma il suo fine principale 
di servire come libro di testo per l'autoap- 
prendimento, poiché offre una trattazione 
esauriente del Pascal e una descrizione fedele 
e precisa del linguaggio standardizzato dall'l- 
SÒ. Pagg. 292, lire 29.000. 















S. Kamins-M. Watte: Programmazione uma¬ 
nizzata in Applesoft Riassume tutte le tecni¬ 
che che vengono comunemente impiegate da¬ 
gli esperti di software per rendere più amiche¬ 
voli i programmi. Vengono infatti affrontati 
tutti gli aspetti di queste tecniche: sia quelli in¬ 
terni al software, come routine a prova di erro¬ 
re o di formattazione dell'input, sia quelli ester¬ 
ni, come la documentazione e i manuali opera¬ 
tivi. Pagg. 208, lire 21.000. 



D. Duff: Guida al Macintosh. Fin dal primo ap¬ 
proccio, il Mac è molto amichevole, e offre sul 
video una scelta tra varie opzioni, rappresen¬ 
tate da icone. In questo modo l'utente può 
scegliere una o più di queste funzioni potendo 
tranquillamente ignorare ciò che avviene all'in¬ 
terno della macchina e superando cosi la natu¬ 
rale diffidenza che a volte i computer ispirano. 
Pagg. 224, lire 22.000. 





P. Cohen: Grafica e animazione con gli Apple 

H. Questo libro vuole guidare gli appassionali 
nella complessa materia della grafica e delFa- 
nimazione, prendendoli per mano dai primi rudi¬ 
menti attraverso numerosi esempi e applica¬ 
zioni, fino a una completa comprensione dei 
principi e dei metodi della computer graphics. 
Gli esempi sono applicati alla famiglia degli Ap¬ 
ple II: Il Plus, Ile, Ile. Pagg. 160, lire 17.000. 



G. Kane: Il manuale MC68000. La famiglia di 
questo microprocessore trova un utilizzo va¬ 
stissimo in workstation, sistemi CAD/CAM, 
sistemi di commutazione telematici, robot e 
controllori di processo, oltre che nei microcom¬ 
puter di recente realizzazione, come Macin¬ 
tosh, ecc. Questo manuale è una preziosa 
fonte di informazione per chi vuole cimentarsi 
con la programmazione in Assembler. Pagg. 
168, lire 16.000. 



H. Mullish-D. Kruger: Il Basic Applesoft. In 16 

capitoli, un metodo graduale che non presup¬ 
pone alcuna conoscenza di base. Tra gli argo¬ 
menti trattati: uso interattivo del computer, 
sintassi dei comandi DOS, formattazione del¬ 
l'input e dell'output, array, selezione e ordina¬ 
mento dei dati, grafica a bassa e alta risolu¬ 
zione, trattamento dei file su disco, debug¬ 
ging, riepilogo delle istruzioni, comandi e funzio¬ 
ni Applesoft. Pagg. 232, lire 19.000. 



T. Field: Come usare MacWrite e MacPaint 

Molto più di quanto facciano i manuali opera¬ 
tivi allegati ai programmi, questo volume sve¬ 
la ogni trucco dei due applicativi per Macin¬ 
tosh, spiegando ed esemplificando particolari 
tecniche di disegno e di gestione dei testi, sem¬ 
pre nell'ottica di un uso integrato dei due pro¬ 
grammi. Pagg. 192, lire 22.000. 
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LaserWriter, 
ma a colori 

Il business è iniziato 
con le fotocopie, ma ora 
il mercato più appetibile 
è il Desktop Publishing. 
In diretta concorrenza con 
la Apple, la Rank Xerox 
(leader nel settore delle 
macchine fotocopiatrici) 
si è lanciata con decisio¬ 
ne sul mercato dell'edito- 
ria da scrivania, propo¬ 
nendo un sistema non 
compatibile con Apple, 
ma dotato di una linea di 
supporti molto interes¬ 
santi e utilizzabili anche 
dagli utenti Apple. 

Vediamo in particolare 
due prodotti ideati per fa¬ 
vorire i servizi di copiatu¬ 
ra, che però allargheran¬ 
no gli orizzonti dell’edito¬ 
ria da tavolo introducen¬ 
do la possibilità di colora¬ 
re i propri elaborati. Inte¬ 
ressantissimi sono i fo¬ 
gli in formato A4, visibi¬ 
li nella foto a lato, dispo¬ 
nibili in una vasta gam¬ 
ma di colori e in diverse 
grammature. Possono es¬ 
sere reperiti nei centri di 
copiatura Rank Xerox. 

La seconda novità si 
chiama Omicrom 2000, 
un sistema semplice che 
permette di trasformare 
in pochi secondi qualsia¬ 


si documento, fotocopia¬ 
to o stampato con la tec¬ 
nologia laser, in stampa 
a colori. 

Dov'è il trucco? La lo¬ 
gica è abbastanza sempli¬ 
ce: basta scegliere il fo¬ 
glio del colore desiderato, 
scelto in una gamma di 
60 tonalità delle quali 14 
metallizzate, applicarlo 
sopra il documento foto¬ 
copiato o stampato e in¬ 
serire il tutto nella mac¬ 
china Omicron 2000, vi¬ 
sibile nella fotografia in 
basso. Il colore verrà ap¬ 
plicato solo nei punti do¬ 
ve il toner della fotoco¬ 
piatrice o della stampante 


laser è depositato. In me¬ 
no di dieci secondi, senza 
bisogno di agenti chimi¬ 
ci, solventi, o particolari 
procedimenti, si potrà ot¬ 
tenere la stampa a colori. 
La macchina Omicron 
2000 costa di listino al 
pubblico 2,5 milioni iva 
esclusa, le confezioni da 
100 unità di fogli colo¬ 
ranti costano dalle 90 al¬ 
le 140 mila lire (iva e- 
sclusa) secondo il tipo: o- 
paco, metallizzato o pa¬ 
stello. Per ulteriori infor¬ 
mazioni è possibile rivol¬ 
gersi direttamente alla O- 
micron, via Della Guerri¬ 
na 108, Monza, telefono 
039/839215. 

Un prodigio 
perISE 

Si chiama Prodigy SE, 
è una scheda dedicata al 
Macintosh SE capace di 
trasformare la nuova mac¬ 
china di Cupertino in u- 
na work-station portatile 
e a basso costo. La confi¬ 
gurazione base Prodigy 
SE comprende una CPU 
a 32 bit, 16 Mhz, Moto¬ 
rola 68020, lo stesso mi¬ 
croprocessore usato dal 
Macintosh II, un mega¬ 
byte di Ram, una Ram 
Disk non volatile e due 
porte di espansione, un 
bus interno a 32 bit dedi¬ 
cato a espansioni della 
Ram e un bus a 16 bit 




I/O per collegarsi a perife¬ 
riche esterne. 

A disposizione, come 
optional, la scheda Prodi¬ 
gy SE prevede un copro- 
cessore matematico Mo¬ 
torola 68881 a 16 Mhz; 
espansioni Ram da due, 
quattro e otto megabyte; 
unità di controllo della 
memoria PPMU 68851 
(la stessa del Macintosh 
II). Quest’ultima è indi¬ 
spensabile per poter lavo¬ 
rare con configurazioni 
superiori a quattro Me¬ 
gabyte, con un limite 
massimo di 32 mega. 

E' facile intuire che in 
questo modo un Macin¬ 
tosh SE avrà le stesse ca¬ 
pacità di memoria virtua¬ 
le disponibili (ma opzio¬ 
nali) sul Macintosh II. 

La scheda Prodigy SE 
è totalmente compatibile 
con tutto il software che 
segue le indicazioni di 
sviluppo per Macintosh, 
segnalate dalla Apple, e 
con la maggior parte dei 
programmi per le reti lo¬ 
cali (come AppleShare, 
Tops e MacServe). 

Prodigy SE è importa¬ 
ta in Italia dalla Anfrel In¬ 
formatica, viale Gramsci 
10/r, Firenze, telefono 
055/2476746 alla quale è 
possibile rivolgersi per 
ulteriori informazioni. 

Il prezzo di listino del 
Prodigy SE con coproces- 
sore 68881 e un Megab¬ 
yte di Ram è di circa 4 
milioni di lire. 

PC e Mac, 
su questa rete 

Solo Macintosh, solo 
Ms-Dos, oppure Macin¬ 
tosh e Ms-Dos: Tops è 
un vero aiuto per chi in¬ 
tende utilizzare in rete lo¬ 
cale un cocktail di PC 
Ibm (compatibili inclusi) 
e Apple. 

Sfruttando le potenzia¬ 
lità della rete AppleTalk, 
Tops garantisce l'integra¬ 
zione tra i due diversi si¬ 
stemi operativi con inter¬ 
scambio di dati e condivi- 














sione di periferiche. Nel 
caso di rete mista va ag¬ 
giunto per ogni PC il 
pacchetto con hardware e 
software di gestione; se 
non è mista bastano pac¬ 
chetto di gestione e con¬ 
nettori AppleTalk (o 
schede Ms-Dos). 

Felibri_ 

Enzo Tonti 


nOGtTTXZlONl E RLAUZZAZIOM DI 



PROGRAMMI 

DIDATTICI 

IN MODAUTX INTERI4JCSONM 


Zanichelli 

Programmi didattici 
in modalità 
interpersonal 
Enzo Tonti - Zanichelli 
310 pagine, 22 mila lire 
La Collana di scienza 
dei calcolatori si arric¬ 
chisce di un nuovo vo¬ 
lume, che si pone come 
supporto per l'insegnan¬ 
te che voglia affrontare 
la propria materia con 
un nuovo e potente stru¬ 
mento quale il personal 


Per informazioni: Del¬ 
ta, via Morazzone 8, Va¬ 
rese, tei. 0332/236336. 

Largo ai giovani 
con Computer Play 

Un software che renda 
più amichevole il rappor¬ 
to con l'elaboratore. E' il 


computer. 11 testo con¬ 
tiene programmi didatti¬ 
ci di geometria, fisica e 
matematica, ognuno 
scritto in tre versioni: 
la prima costituita da i- 
struzioni scritte in ita¬ 
liano nota come pseudo¬ 
codice, la seconda in 
linguaggio Pascal e la 
terza in linguaggio Ba¬ 
sic. 

Da sottolineare che la 
versione in Basic è 
scritta seconda una mo¬ 
dalità, denominata dal¬ 
l'autore Modalità Inter¬ 
personal, che consente 
l’adattamento automati¬ 
co dei listati a diversi 
tipi di elaboratori me¬ 
diante opportune tavole 
di conversione riporta¬ 
te nell'appendice del li¬ 
bro. 

Tutti i programmi so¬ 
no stati verificati sui 
seguenti elaboratori: 
Apple 13, Apple Macin¬ 
tosh, Olivetti M20 e 
M24, Commodore 64, 
ZX Spectrum e MSX. 


A destra: due grafici tratti dal volume Italia Informatica 


tema del concorso Com¬ 
puter Play 87, aperto ai 
giovani fino a 21 anni, 
che si svolgerà in settem¬ 
bre allo SMAU. I vinci¬ 
tori parteciperanno a sta¬ 
ge offerti dalle principali 
aziende informatiche. In¬ 
formazioni: Studio Edit, 
C. di Porta Romana 51, 
Milano, tei. 02 590490. 

Dalla Laser 
in pellicola 

La Folex ha sviluppa¬ 
to una linea di prodotti 
che consente di stampare 
con un personal diretta- 
mente su lucido per retro- 
proiezioni anche a colori. 
Molto ricco il catalogo 
dei prodotti, specifici per 
diverse periferiche: plot- 
ter e stampanti a matrice, 
termiche, a getto d'inchio¬ 
stro o a tecnologia laser. 
Per informazioni: Folex, 
v. Edison 40, Trezzano 
(MI), tei. 02/4459812. 


ITALIA 

INFORMATICA 



Italia Informatica 
A cura del servizio studi 
Honeywell - ISJ. 

Edizioni del Sole 24 Ore 
276 pag. 60 mila lire. 

Dieci anni di analisi e 
prospettive sul mercato 
Edp: è il sottotitolo di I- 
talia Informatica, curato 
dal servizio studi e ricer¬ 
che di mercato della Ho- 
neywell Information Sy¬ 
stem Italia. Tratta le ten¬ 
denze strategiche del 
mercato Edp analizzando 
il rapporto tra in formati - 



LA FOLEX COLORA 
LA VOSTRA PRESENTAZIONE 



Poker d'assi, 
ingegnere! 

Da sempre dedicato al¬ 
l’ingegneria civile, il cata¬ 
logo della Asso Engine¬ 
ering si è aggiornato e ha 
vestito di nuovo le pro¬ 
prie applicazioni, che 
soddisferanno ancora di 


ca, sviluppo e modifica¬ 
zioni organizzative nei 
vari settori dell’econo¬ 
mia. Al centro dell'anali¬ 
si il legame esistente tra 
sviluppo dell'industria 
informatica e comporta¬ 
mento dei diversi settori 
di utenza, tanto più rile¬ 
vante se si analizza la 
crescente complessità 
del mercato informatico. 
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Un esempio di videata di AssoCalc, con il numero dei telai e dei nodi di una struttura. 


più le esigenze degli ope¬ 
ratori di questo settore. 
Assocalc, dedicato al cal¬ 
colo di strutture in ce¬ 
mento armato in zona si¬ 
smica è ora disponibile 
nella versione 3.5 che ri¬ 
spetto alle precedenti rele- 
ase è totalmente compati¬ 
bile con il sistema opera¬ 
ti^vo gerarchico del Macin¬ 
tosh, possiede ora dei ta¬ 
sti funzione associati ai 
menù di maggiore acces¬ 
so e ha limato la riparti¬ 
zione dei carichi sulle tra¬ 
vi di fondazione. Il prez¬ 
zo di listino è di 1 milio¬ 
ne iva esclusa. 

AssoGraph 2.5 (750 
mila lire iva esclusa), per 
i disegni esecutivi di can¬ 
tiere di strutture di cemen¬ 
to armato, Assofond 1.5 
(550 mila lire iva esclu¬ 
sa), per il progetto e la 
verifica di fondazioni 
Winkler, Plinti e Pali, e 
Assosezioni 1.2 (250 mi¬ 
la lire iva esclusa), per la 
progettazione e la verifi¬ 
ca di sezioni in cemento 
armato, completano la se¬ 
rie della Asso Engine¬ 
ering. Per ulteriori infor¬ 
mazioni è possibile ri¬ 
volgersi ad Asso Enginee¬ 
ring, via Tessalonica 47, 
Roma, tei. 06/5573027. 

Parigi e Boston 
per n DTP 

Parigi in giugno e Bo¬ 
ston in agosto. Due ap¬ 
puntamenti da segnare 


sull’agenda degli addetti 
ai lavori. All’ombra della 
Tour Eiffel, il 22 e 23 
giugno si terrà il primo 
Symposium europeo sul 
Desktop Publishing che 
sarà corredato da un semi¬ 
nario e da un'esposizione 
sul tema dell’editoria da 
scrivania. Organizzata 
dall’EDTPG, acronimo di 
European Desktop Publi¬ 
shing Group, la manife¬ 
stazione proporrà le ulti¬ 
me novità in fatto di tec¬ 
nica, strategia e mercato 
da parte dei produttori e 
dei maggiori utenti del 
settore. Per ulteriori in¬ 
formazioni è possibile 
contattare Olivier de Bail- 
lenx a Parigi, telefono 
42603940. 

Ancor più completo e 
atteso il MacWorld di Bo¬ 


ston, che nei giorni 11, 
12 e 13 agosto proporrà 
le novità mondiali prodot¬ 
te per il Macintosh. 

Il Macintosh II terrà 
banco nella manifestazio¬ 
ne: si prevedono infatti 
numerose e rivoluziona¬ 
rie novità per il già 
famoso Open Mac. 

I nuovi caratteri 
di Adobe 

PostScript è il magico 
linguaggio che ha per¬ 
messo al Macintosh di a- 
prire la strada e porsi al 
vertice di quel nuovo set¬ 
tore battezzato Desktop 
Publishing, l’editoria da 
scrivania. 

Non solo gli uffici han¬ 
no tratto vantaggio da 
queste nuove soluzioni, 
ma anche editori di perio¬ 


dici e libri, persino le 
stesse tipografie che lavo¬ 
rano su sistemi di foto¬ 
composizione hanno ap¬ 
prezzato la versatilità e la 
qualità del sistema. Per 
far fronte alle esigenze 
grafiche sempre più com¬ 
plesse e sofisticate, la sta¬ 
tunitense Adobe ha realiz¬ 
zato una biblioteca di 
nuovi caratteri disponibi¬ 
li per la LaserWriter della 
Apple. 

Ogni famiglia di font 
viene fornita con un pro¬ 
gramma di installazione 
che carica nella LaserWri¬ 
ter i dati necessari alla 
stampa, e un Font Mo¬ 
ver che permette di instal¬ 
lare nel file di sistema 
del Mac i font-video ne¬ 
cessari per la corretta vi¬ 
sualizzazione su moni- 


ITO American Typewriter 


ITC Benguiat Book 

ITC Garamond Light 

ITC MACHINE 

ITC Souvenir Light Italie 

Optima Bold 


LISTINO AL PUBBLICO 


Palatino 480.000 

ITC Bookman 480.000 

ITC Zapf Chancery/Dingbats 400.00 

ITC Avant Garde 480.000 

New Century Schoolbook 480.000 

Optima 480.000 

ITC Souvenir 480.000 

ITC Lubalin Graph 480.000 

ITC Garamond 480.000 

ITC American Type/Machine 400.00 

ITC Benguiat/Fritz Quadrata 480.00 

Glypha 480.000 

Helvetica Light/Black 480.000 

Helvetica Condensed 1.000.000 


Trup Mediaeval 480.000 

Merio! 480.000 

ITC Galliard 480.000 

ITC New Baskerville 480.000 

ITC Korinna 480.000 

Goudy Old Style 480.000 

Sonata 250.000 

Century Old Style 250.000 

ITC Franklin Gothic 750.000 

ITC Cheltenham 480.000 

Park Avenue 250.000 

Bodoni 480.000 

Letter Gothic 480.000 

Prestige Elite 480.000 

Orator 250.000 
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Quanto costa il Macintosh II 

Ecco il listino dei prodotti dedicati al Mac II. I prezzi sono iva esclusa. 

Prodotto 

Prezzo 

Disponibile 

Macintosh n + tastiera base 

7.250.350 

giugno 

Macintosh II/HD40 + tast. base 

10.050.350 

giugno 

Macintosh 13 + tast. estesa 

7.350.350 

giugno 

Tastiera base per Mac II 

250.000 

giugno 

Tastiera estesa per Mac n 

350.000 

giugno 

Scheda video Macintosh II 

900.000 

giugno 

Monitor monocromatico 

600.000 

giugno 

Monitor a colori 

1.500.000 

luglio 

Drive 3,5" 800 Kb interno 

500.000 

giugno 

Esp. RAM 2Mb per SE-II-Plus 

1.900.000 

giugno 

Esp. RAM 1Mb per Mac II 

560.000 

giugno 

Esp. 8-bit scheda video 

200.000 

giugno 

Stand per monitor universale 

150.000 

luglio 

PC drive con scheda per Mac II 

850.000 

luglio 

Disco rigido SCSI 40Mb interno 

2.800.000 

settembre 

Disco rigido SCSI 80Mb interno 

4.600.000 

settembre 

Apple/Unix Stan-alone 

da definire 

settembre 

Apple/Unix Full version 

2.000.000 

settembre 

68851 PMMU per Mac II 

900.000 

settembre 

EtherTalk per Mac II 

1.500.000 

settembre 


tor. Nella Laser plus è 
possibile inserire da due 
a sei famiglie di caratteri 
in uso oltre le tredici già 
presenti. I font Adobe 
sono forniti in pacchetti 
mono o multi printer, 
cioè installabili solo in u- 
na o in più stampanti Po¬ 
stScript fino a un massi¬ 
mo di cinque macchine; i 
prezzi multiprinter sono 
circa il doppio degli altri. 
Distributore per l’Italia è 
Pc Personal Computer, 
via Chiapponi 42, Pia¬ 
cenza, tei. 0523/20626. 

Offset 

con Macintosh 

Per la prima volta, la 
Mostraintemazionaledel- 
l’Industria grafica, edito¬ 
riale, cartaria e trasforma¬ 
trice (Gec ’87), ha avuto 
la partecipazione della 
Apple Computer, a dimo¬ 
strazione della sempre 
maggiore introduzione in 
questo mercato delle solu¬ 
zioni di Desktop Publi- 
shing con il marchio del¬ 
la mela iridata. 

La novità di maggior 
rilievoèrappresentatadal- 
l’integrazione dei perso¬ 


nal computer Macintosh 
con i terminali di stampa 
dellaOffsetltalia. Dedica¬ 
te a tipografie e copiste¬ 
rie che scelgono di specia¬ 
lizzarsi nei servizi di 
Pronta Stampa (mercato 
che negli Stati Uniti con¬ 
ta oltre 20 mila esercizi), 
ma anche a tutte le azien¬ 
de con elevata produzione 
editoriale interna, le solu¬ 


zioni proposte da Apple 
e Offset coprono diverse 
fasce di esigenze. Runner 
System, il sistema più 
piccolo, è basato su un 
Macintosh SE e sul du¬ 
plicatore Top Runner, ca¬ 
pace di 7.200 copie ora¬ 
rie. I listini, le circolari e 
qualsiasi documento im¬ 
paginato con Mac e stam¬ 
pato su LaserWriter vie¬ 


ne impiegato per genera¬ 
re le matrici di carta che 
Top Runner utilizza per 
la stampa in bianco e ne¬ 
ro o a un colore grazie a 
un sistema di cartucce in¬ 
novativo. 

Top Runner consente 
di stampare con facilità 
anche biglietti da visita, 
business card, carte inte¬ 
state e buste; costerà 52 
milioni (56 con il genera¬ 
tore di matrici). 

Di fascia più alta l’SP 
Printer System, che può 
stampare fino a 25.000 
copie orarie anche su en¬ 
trambi i lati della pagina. 
Il prezzo di questa solu¬ 
zione è stato fissato in 
66 milioni di lire. 

Si sale ulteriormente 
con le stampanti offset 
R45SY e R45SYK, per 
una stampa ad alta quali¬ 
tà a più colori A4. 

Dedicate al formato A3 
sono invece le macchine 
Hamada serie 6 e Apollo, 
una mini-web per la 
stampa a più colori in 
bianca e volta. 

Per ulteriori informa¬ 
zioni è possibile rivolger¬ 
si direttamente alla Ap¬ 
ple Computer, via Rivol- 
tana 8, Segrate, telefono 
02/7533751. 


L'SP Printer System della Offset Italia, che stampa fino a 25 mila copie/ora. 
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DESKTOP PUBLISHING 


Sulla scrivania di chi edita col computer non può più mancare. Fotografie, 
disegni, progetti, e ormai anche testi, balzano sul video pronti 
per essere impaginati e manipolati. E all'orizzonte c'è già il colore. 

Il futuro 

si chiama scanner 


Un nuovo verbo inglese è entrato 
nel mondo del Desktop Publishing: 
to scan. Il vocabolario traduce in 
scandire, usato nella poesia. Nel ger¬ 
go computerese, invece, questa paro¬ 
la è stata orribilmente trasformata in 
"scannizzare" o, ancor peggio, "scan¬ 
nare", e viene usata per indicare l'o¬ 
perazione eseguita da una unità peri¬ 
ferica di un computer dedicata alla 
lettura, riga dopo riga, (appunto lo 
scandire) di una immagine. 

Questa unità periferica, lo scanner, 
ha da poco fatto il suo ingresso nel 
mercato dei personal computer. Con 
questo nome vengono chiamati an¬ 
che dei dispositivi molto costosi che 
realizzano la separazione dei colori 
delle foto che devono essere stampa¬ 
te. 

Nel neonato mondo dell'editoria a 


basso costo, per scanner si intende 
invece il dispositivo che, collegato a 
un personal computer, di norma un 
Macintosh, il re del Desktop Publi¬ 
shing, permette la lettura di immagi¬ 
ni e la loro conseguente elaborazio¬ 
ne e stampa. 

Precursore degli attuali scanner è 
stato ThunderScan, un dispositivo a 
basso costo che, sfruttando la mecca¬ 
nica di una stampante, permette la 
scansione di un documento e la sua 
successiva elaborazione. 


Il software di questo dispositivo 
venne realizzato da Andy Hertzfeld, 
uno dei personaggi che ha inciso la 
sua firma all'interno del contenitore 
del Macintosh. 

La risoluzione data da Thunder¬ 
Scan era buona sino a quando si usa¬ 
va come dispositivo di stampa una I- 
mageWriter. Con l'avvento della La¬ 
serWriter le esigenze di qualità sono 
aumentate ed ecco quindi la compar¬ 
sa di dispositivi aventi la risoluzio¬ 
ne di 300 punti per pollice, appunto 
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la stessa della LaserWriter. E' da cir¬ 
ca un anno che questi scanner sono 
apparsi sul mercato; in Italia, soprat¬ 
tutto per le sue caratteristiche softwa¬ 
re, la macchina che ha avuto più suc¬ 
cesso è stata lo Scan 300 della Aba- 
ton Technology, USA. Questa ditta 
americana, nata nel febbraio del 
1985, crede nella filosofia di studiare 
il mercato e di fissare per i propri in¬ 
gegneri degli obiettivi nuovi e inno¬ 
vativi. Utilizzando delle parti mecca¬ 
niche prodotte da altre case, si è con¬ 
centrata nella realizzazione di ciò che 
rende il prodotto completo dal punto 
grafico: il software. 

Ecco quindi che C-SCAN, il pac¬ 
chetto software in dotazione agli 
scanner Abaton, è indubbiamente u- 
no dei migliori disponibili. La filo¬ 
sofia di Abaton è quella di migliora¬ 
re continuamente i propri prodotti, 
cosicché saranno via via disponibili 
nuove release che sfrutteranno al 
massimo le capacità delle meccani¬ 
che usate. 

Come si usa uno Scanner 

I modi secondo cui possono esse¬ 
re usati gli scanner sono essenzial¬ 
mente tre: 

a) lettura di immagini al tratto; 

b) lettura di immagini con mezze tin 

te; 

c) lettura di testi. 

Le immagini al tratto (disegni tec- 
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Gli altri scanner in Italia 

Il mercato degli scanner ha avuto un trend di crescita dominante nel settore dei personal computer e, in par¬ 
ticolare, nella fascia battezzata Desktop Publishing. Tanto che in America sono almeno trenta, fra quelle dedi¬ 
cate al Pc e quelle a Macintosh, le macchine in grado di catturare testo e immagini e inviarle a un personal 
computer. In Italia è possibile scegliere fra cinque diversi modelli: a parte ThunderScan, l'antenato di queste 
periferiche, lo scanner Abaton, descritto nelfarticolo, e quello prodotto dalla Agfa che, rispetto all'articolo 
pubblicato su Applicando numero 31-novembre 86, ha solamente sviluppato una nuova release del program¬ 
ma MacScan, due nuovi modelli sono stati introdotti sul mercato italiano. 

• TurboScan. Dopo hard disk, sistemi di back up e numerose schede per espandere le macchine Apple, 
il colosso statunitense AST ha realizzato anche un modello di scanner. Battezzato TurboScan, permette una 
scansione con una risoluzione di 300 punti per pollice. La tecnica utilizzata è quella dell'inseritore di fogli fi¬ 
no a un formato massimo di 8,5 x 11 pollici. Il programma TurboScan Utility Software permette la gestio¬ 
ne delle immagini che poi possono essere lavorate con tutti i programmi grafici del Macintosh. TurboScan 
costa 4,5 milioni e per ulteriori informazioni è possibile rivolgersi alla DHT, via Quintino Sella 4, Milano. 
Telefono 02/866425. 

• Datacopy. Si chiama 730, è targato Datacopy e verrà importato in Italia dalla Delta di Varese. La mec¬ 
canica di questo modello è a piano mobile, e permette una scansione delle immagini con una risoluzione di 
300, 240, 200 o 150 punti per pollice. Alla macchina è legato un kit, denominato Maclmage kit, che contie¬ 
ne il software di gestione dello scanner Maclmage, il programma SuperPaint e l’interfaccia SCSI per il colle¬ 
gamento a un Macintosh provvisto di questa uscita. Come optional è possibile richiedere il sofware O.C.R. 
per il riconoscimento dei caratteri. Per ulteriori informazioni Delta,via Morazzone 8, Varese. Telefono 
0332/236336. 


nici, meccanici, elettrici, ecc.) ven¬ 
gono letti con la risoluzione di 300 
punti per pollice. 

Una volta stampati con una Laser, 
si ottiene praticamente una fotoco¬ 
pia dell'originale, con il vantaggio 
che l'operatore può intervenire nella 
operazione di copiatura. Infatti il di¬ 
segno letto può essere elaborato, o 
mediante il software in dotazione del¬ 
lo scanner stesso, o mediante altro 
software che consenta la manipola¬ 
zione di immagini a 300 punti per 
pollice. 

Indubbi sono i vantaggi che si pos¬ 
sono ottenere nella manipolazione, 
per esempio, di esplosi di parti mec¬ 
caniche: con semplici operazioni di 
taglia e incolla sarà possibile modifi¬ 
care o ricostruire i disegni. Il softwa¬ 
re C-SCAN permette di tenere aperte 
sino a 5 finestre diverse. Anche la 
gestione di marchi e logotipi viene 
resa semplice grazie all'uso di uno 
scanner. La lettura delle immagini 
con mezze tinte consente di riprende¬ 
re delle fotografie e di inserirle, per e- 
sempio, in programmi di impagina¬ 
zione. Anche la foto viene quindi ri¬ 
presa elettronicamente e può essere e- 
laborata e dimensionata nella manie¬ 
ra ottimale. Anche in questo caso so¬ 
no possibili operazioni di taglia ed 
incolla per ottenere nuovi effetti. 

A seconda del software disponibile 


si può andare da 16 sino a 64 livelli 
di grigio. 

La lettura dei testi mediante pro¬ 
grammi OCR (Optical Character Re- 
cognition) è, per ora, la parte più ca¬ 
rente nell’applicazione di scanner. 
Sinora questa operazione viene rea¬ 
lizzata con dispositivi estremamente 
costosi (un centinaio di milioni) che 
ottengono veramente lo scopo. Il 
software oggi disponibile permette 
la lettura per lo più di pagine dattilo- 
scritte dove, cioè, ogni carattere è 
ben separato dal successivo. I testi 
fotocomposti hanno normalmente 
un accavallamento di caratteri che 
impedisce l'esatta lettura. 

Elcom, la ditta che distribuisce gli 
scanner della Abaton Technology, 
conferma la disponibilità entro l'an¬ 
no di un software evoluto rispetto al¬ 
l'attuale, in grado cioè di leggere an¬ 
che pagine fotocomposte. Grazie a 
un nuovo algoritmo sarà infatti pos¬ 
sibile leggere caratteri praticamente 
di qualunque dimensione, anche se di¬ 
sposti in più colonne e anche se le 
lettere sono legate tra di loro. 

Per quanto riguarda la realizzazio¬ 
ne meccanica gli scanner si dividono 
essenzialmente in duecategorie: quel¬ 
li a lastra piana (tipo fotocopiatrice) 
e quelli che fanno passare il foglio 
tra due rulli. A seconda delle esigen¬ 
ze dell’utente si userà il primo quan¬ 


do si vogliano appoggiare diretta- 
mente le pagine di un libro sul pia¬ 
no di lettura, o il secondo se è possi¬ 
bile effettuare una fotocopia dell'ori- 
ginale. 

La dotazione di memoria dei com¬ 
puter dedicati alla lettura di immagi¬ 
ni mediante scanner deve essere ade¬ 
guata. Infatti una pagina formato 
A4, letta con la risoluzione di 300 
punti per pollice, richiede l'uso di 
circa un mega di memoria RAM. Ec¬ 
co quindi che sarà opportuno dotare 
il Macintosh di un'aggiunta di me¬ 
moria, portandolo almeno a due me¬ 
ga, per poter lavorare comodamente 
sulle immagini riprese. 

Il futuro degli scanner vedrà delle 
innovazioni sia per quanto riguarda 
l'hardware che il software. Verranno 
dotati di porte SCSI, che permette¬ 
ranno una maggior velocità di trasfe¬ 
rimento dei dati e quindi una mag¬ 
gior velocità di lettura. Il software 
permetterà la disponibilità di stru¬ 
menti sempre più numerosi e poten¬ 
ti per la correzione delle immagini e 
una sempre maggior interscambiabi- 
lità tra vari programmi. E, natural¬ 
mente, la prossima generazione sarà 
quella degli scanner a colori. 

Scan 300 della Abaton costa 
L.5.250.000+Iva è distribuito in 
esclusiva dalla Elcom, corso Italia 
149, Gorizia, tel.0481/30909 
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della scatola nera! 


Potenza e semplicità fanno di OMNIS 3 
uno dei migliori Data Base relazionali oggi disponibili. 
Senza alcuna conoscenza dei linguaggi -j 
. di programmazione é possibile 
realizzare complesse applicazioni software per ógni 
esigenza del tuo lavoro. 

OMNIS 3 ^disponibile in versione mono o multiutente 
per MACINTOSH, APPLE II GS, 

IBM^Pc/Xt/At e compatibili, OLIVETTI M24 e M28. 


I nostri "Esperti OMNIS 3" potranno aiutarti nella realizzazione di una tua nuova 
applicazione o assisterti nell' uso e nella personalizzazione 
di una delle tante applicazioni già disponibili: 

Fatturazione • Magazzino • Bollettazione • Preventivazione 
Distinta Base • Ordini e Produzione » Computo metrico • Legge 373 
Contabilità Clienti/Forn. • Contabilità Generale • Contabilità industriale 
Gestione Dentisti, Medici, Avvocati, Condomini, Videoteche, Palestre, 

Boutique, Assicurazioni, ecc. 



OMNIS 3 Plus 
nuova versione 
per MACINTOSH 


f ’ ~PROVA "! OMNFs 3 

/ Volete provare le eccezionali qualità 

di questo potente programma ? 

Richiedeteci una copia di "PROVA OMNIS 3" a £. 118.000 
Iva e spedizione compresa. Riceverete il programma originale 
(limitato a 50 records) con un esauriente manuale. 
L'importo verrà rimborsato in caso di acquisto di "OMNIS 3". 


OMNIS 3 é disponibile presso i migliori APPLE CENTER 
Distribuito ed assistito in esclusiva in tutta Italia da: 


Computer.. 


Via Chiag£oni^42-29100_PIAC_ENZA_052^20626 
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Ogni mese in edicola 

le riviste con disco programmi per 
IBM e compatibili, Apple e Commodore. 




DISK 


N men#e con Geco programmi 

ptf pertonai computer Ibm, Ofcvetti « comparò» 

■ DISK 


Lei possiede un computer IBM 
o compatibile? Oppure un Apple II? 

Oppure, ancora, un Commodore 64 o un 128? 

Allora acquisti subito in edicola PcDisk, AppleDisk o CommoDisk. 

Si tratta di una novità eccezionale, e cioè di tre riviste i cui contenuti sono 
composti da recensioni, articoli di fondo d'interesse generale per gli 
utenti di personal computer, ma anche dalla descrizione dettagliata dei 
programmi registrati sul disco allegato alla rivista. E non si tratta di 
"programmini", bensì di programmi utili, il cui costo tradizionale sarebbe 
di decine o, in alcuni casi, anche di centinaia di migliaia di lire ciascuno. 

AppleDisk, CommoDisk, PcDisk sono in vendita in tutte le 
edicole d'Italia a 15.000 lire l'una (CommoDisk a 13.000 lire). Se il suo 
edicolante ne fosse sprovvisto, prenoti presso di lui il prossimo numero. 

Perderlo sarebbe un peccato! 


BREAK 
EVEN FOINT 

i#V6<vssn 
















CARATTERI 


La Fucina di Font è un potente e semplice editor che permette di creare 
i propri set di caratteri in alta risoluzione. Inoltre, il generatore di caratteri 
rende semplice la visualizzazione degli stessi sullo schermo Hi-Res, 
rendendoli facilmente utilizzabili e integrabili con il vostro programma. 











Miscelare testi e grafici sullo 
schermo Hi-Res può risultare diffi¬ 
coltoso, specialmente da Applesoft. 
Si può fare con delle "shape tables", 
ma è difficile e soprattutto tedioso 
creare i caratteri in questo modo. La 
Fucina di Font rende questa operazio¬ 
ne semplice quanto un comando 
PRINT. 

La Fucina di Font è costituita da 
due programmi: un editor di caratteri 
(listato 1) che permette di creare e 
modificare in modo estremamente 
semplice sia caratteri sia shape, e un 
generatore di caratteri (listato 2) 
che si preoccupa di tutti i dettagli re¬ 
lativi àia visualizzazione di quanto 
creato con il programma precedente. 
A titolo dimostrativo Fucina di 
Font viene corredato di due set di 
font già creati. Il primo è una combi¬ 
nazione di caratteri ASCII standard e 
di simboli grafici, l'altro invece me¬ 
scola ai soliti alfabetici dei caratteri 
scientifici. 

Come usare l editor 

Quando si fa girare l'editor di Fuci¬ 
na di Font (il file si chiama 
CHAR.ED, listato 1), viene inizial¬ 
mente mostrato uno schermo di ben¬ 
venuto. Premendo Return si visualiz¬ 
za il menù principale, composto da 
6 opzioni: 

1. Edit set di caratteri: permette 
di entrare nello schermo principale 
deH’editor, dove si possono visualiz¬ 
zare e modificare i caratteri. 

2. Salva set di caratteri: salva su 
disco tutti i dati relativi alla creazio¬ 
ne di quel set di caratteri. 

3. Carica set di caratteri: richia¬ 
ma da disco un set memorizzato pre¬ 
cedentemente. 

4. Uscita: permette di lasciare il 
programma. 

5. Aiuto: visualizza alcune brevi 
istruzioni. 

6. Catalog del disco: dopo avere 
richiesto il numero di drive (rispon¬ 
dete con 1 oppure 2), mostra il con¬ 
tenuto del dischetto. 

Modifica dei set di caratteri 

Un singolo set di caratteri di Fuci¬ 
na di Font è costituito in realtà da 
due serie: un set ASCII normale e u- 
no alternativo definito dall'utente. 

Dopo essere stato lanciato, Fucina 
di Font carica automaticamente il 
set di caratteri chiamato NOR- 
MAL.SET (listato 3). La sua mo¬ 
difica avviene grazie all'opzione 1 
del menù principale. Lo schermo vie¬ 


ne pulito e viene mostrata una rap¬ 
presentazione grafica della tastiera 
dell'Apple, con visualizzati i caratte¬ 
ri associati a ciascun tasto. Come 
noterete, i caratteri speciali, come le 
vocali accentate, sono stati raggrup¬ 
pati in alcune zone particolari. 

Per modificare un carattere partico¬ 
lare, si deve semplicemente premere 
il tasto relativo a quel carattere. Pre¬ 
mete, ad esempio, il tasto E. Dopo 
circa due secondi il programma mo¬ 
strerà nell'apposito riquadro l'ingran¬ 
dimento del carattere stesso. Grazie 
ai tasti freccia, o ai caratteri I, J, K e 
M, è possibile spostare il cursore 
nel campo di editing. Ciascuna posi¬ 
zione corrisponde a un pixel del ca¬ 
rattere. Premendo Spazio si accende 
o si spegne il pixel individuato dal 
cursore. Se si cambia idea sulle mo- 
difiche effettuate, è sufficiente preme¬ 
re il tasto Q, che riporta il carattere 
al suo stato iniziale. Se si vuole ini¬ 
ziare un carattere da zero, premendo 
C si ripulisce l'intera griglia. 

Quando il carattere sarà finalmente 
come lo avete desiderato, premendo 
Return lo si fisserà in memoria. Fa¬ 
te attenzione che le modifiche non 
saranno permanenti, fintanto che 
non si salverà su disco l'intero set 
grazie all'apposita opzione del menù 
principale. Questo è raggiungibile, 
dopo che saranno state effettuate tut¬ 
te le modifiche richieste, premendo 
Control-F. 

Tre altre funzioni sono disponibili 
dallo schermo di editing: 

• Control-D: permette di dupli¬ 
care un carattere, il che è particolar¬ 
mente utile, poiché molti caratteri 
sono simili, ed è molto più veloce 
modificare quanto esistente piuttosto 
che partire da zero. 

• Control-S: scambia di posto 
due caratteri. 

• Control-X: cambia il set di ca¬ 
ratteri visualizzato da quello prima¬ 
rio a quello alternativo, e viceversa. 

Una nota per gli utenti di Apple II 
Europlus: l'editor è stato creato per 
permettere di lavorare sia su caratteri 
maiuscoli che minuscoli. Se avete 
installato la modifica del tasto Shift, 
il programma lo riconoscerà e auto¬ 
maticamente vi permetterà di lavora¬ 
re su tutti i caratteri. Altrimenti il 
default di input sarà per i caratteri 
minuscoli. Premendo Escape si può 
digitare un carattere maiuscolo, men¬ 
tre se si vogliono tutti così si deve 
digitare Control-A. Inoltre esistono 


6 caratteri che non sono disponibili 
su EuroPlus ma solo su Ile: _, §, A , 
°, é, £. Questi caratteri possono esse¬ 
re digitati premendo contemporanea¬ 
mente Control-Shift e 0, P, N, K, 
MeL. 

Per ovviare agli inevitabili proble¬ 
mi di traduzione, nell'Europlus il set 
di caratteri NORMAL.SET è stato 
infatti completamente italianizzato, 
mentre quello presente in SCIENTI- 
FIC.SET è quello standard ASCII, 
che permette tra l'altro l'uso di paren¬ 
tesi graffe e quadre. Per riferimento, 
il lettore potrà affidarsi alla tabella 
qui riportata che mostra le corrispon¬ 
denze tra i due alfabeti citati: 

ASCII Italiano 

@ § 

[ 

\ 9 

] 6 

ù 

{ à 

I ò 

} è 

ì) 

Utilizzo del generatore 

II programma CHAR.GEN (lista¬ 
to 2) è utilizzato dall’editor per mo¬ 
strare i caratteri sul video Hi-Res. I- 
noltre aggiunge all'Applesoft una se¬ 
rie di comandi di facile utilizzo, che 
potrete sfruttare anche nei vostri pro¬ 
grammi per gli usi più disparati: mi¬ 
scelazione di grafici e testo, creazio¬ 
ne di diagrammi, visualizzazione di 
caratteri stranieri, e molto altro. 

Questi comandi sono del tutto si¬ 
milari ad altri comandi Applesoft, 
con la differenza che lavorano sulla 
pagina grafica. Prima di poterli uti¬ 
lizzare si dovranno aggiungere in te¬ 
sta al programma le istruzioni sotto 
elencate. Tali routine caricano il set 
di caratteri normale e il generatore di 
caratteri stesso, e inizializzano i vet¬ 
tori di input e output affinché siano 
chiamati tutte le volte che avviene u- 
na operazione di I/O. 


10 HIMEM: 34816 

20 PRINT CHR$ (4) "BLOAD 

NORMAL.SET” 

30 PRINT CHR$ (4) "BLOAD 
CHAR.GEN” : CALL 35840 
40 IF PEEK (48896) = 76 THEN 
PRINT CHR$(4)"PR#A$8DC 1 " : 
PRINT CHR$(4)"IN#A$8ECA" 


Una volta che tutto è caricato e ini- 
zializzato, avrete a disposizione i se¬ 
guenti comandi: 
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• &HOME - Pulisce lo schermo 
Hi-Res e posiziona il cursore in alto 
a sinistra. Utilizzando il comando 
senza & posizionerà il solo cursore, 
senza effettuare la pulizia dello scher¬ 
mo. 

• &CLEAR L - Pulisce lo 

schermo dalla posizione attuale del 
cursore fino al termine della linea. 

• &CLEAR P - Pulisce lo 

schermo dalla posizione attuale del 
cursore fino al termine della finestra 
attiva (vedere di seguito il comando 
&WINDOW). 

• &INPUT (A$, max) - Accet¬ 
ta in input un numero max di caratte¬ 
ri, inserendoli nella variabile stringa 
A$. Max può essere un valore com¬ 
preso tra 0 e 255; A$ può essere una 
qualsiasi variabile stringa. Per esem¬ 
pio, &INPUT (A$,25) permette di 
accettare fino a 25 caratteri. Un qual¬ 
siasi carattere di controllo, incluso il 
Return, termina l’input. Se A$ ha 
già assegnato un valore quando è uti¬ 
lizzato in &INPUT, questo sarà mo¬ 
strato come default, e potrà essere 
confermato premendo semplicemen¬ 
te Return. 

• &WINDOW (left, top to ri- 
ght, bottoni) - Delimita la finestra 
di testo. Left, right, top e bottoni 
possono essere numeri, variabili o e- 
spressioni, e corrispondono al margi¬ 
ne della finestra (rispettivamente a 
margine sinistro, destro, alto e bas¬ 
so). Left e right devono essere com¬ 
presi nelfintervallo tra 0 e 39; top e 
bottom tra 0 e 23. Per esempio il co¬ 
mando &WINDOW (0, 0 to 39, 23) 
crea una finestra che comprende l'in¬ 
tero schermo, mentre &WINDOW 
(0,10 to 20, 20) ne crea una più pic¬ 
cola. I comandi &HOME e &CLE- 
ARP operano solo sulla finestra 
corrente. 

• &SCROLL - Attiva e disatti¬ 
va la funzione di scroll del video. 
Normalmente quando il testo ha rag¬ 
giunto la fine dello schermo, le pri¬ 
me righe scompaiono in alto, per la¬ 
sciare posto ad altre sul fondo dello 
schermo. Disattivando lo scroll, il 
cursore si riposizionerà in alto a sini¬ 
stra senzaper questo effettuare puli¬ 
zie del video. 

• &PAGE (p) - Seleziona la pa¬ 
gina Hi-Res utilizzata per la visualiz¬ 
zazione. Il valore p può essere un nu¬ 
mero, una variabile o una espressio¬ 
ne, che dovrà essere nelfintervallo 
tra 1 e 2. Il valore di default è 2. 

• CALL 35840 - Resetta tutte 
le opzioni ai loro valori di default e 


pulisce la pagina Hi-Res 2. 

• POKE 24,0 - Abilita il Bloc¬ 
ca minuscole interno affinché tutti i 
caratteri siano minuscoli. 

• POKE 24,255 - Disabilita il 
Blocca minuscole interno. 

• POKE 7,144 - Visualizza il 
set di caratteri normale. 

• POKE 7,147 - Visualizza il 
set di caratteri alternativo. 

Oltre a questi, esistono una serie 
di comandi diretti che possono esse¬ 
re utilizzati durante un input. Pensa¬ 
ti principalmente per gli utenti di 
Apple II EuroPlus, che non dispon¬ 
gono di una tastiera ASCII comple¬ 
ta, non sono operativi per Applelle 
e Apple Ile: 

• Control-A: Attiva e disattiva 
il Blocca maiuscole. 

• Escape: Rende maiuscola la let¬ 
tera successiva. 

• Shift-Control-P: Genera §. 

• Shift-Control-M: Genera é. 

• Shift-Control-N: Genera A . 

• Control-K: Genera \ 

• Control-L: Genera £. 

■ Control-O: Genera _. 

Si possono notare occasionalmen¬ 
te delle linee orizzontali lampeggian¬ 
ti sullo schermo. Questo è apparente¬ 
mente un bug nelle ROM del Ile ori¬ 
ginale, non presente nel Ile e nel Ile 
Enhanced. 

Set di caratteri 

Fucina di Font è completo di due 
set di caratteri: NORMAL.SET (li¬ 
stato 3) e SCIENTIFIC.SET (li¬ 
stato 4). Come accennato preceden¬ 
temente, un singolo set è in realtà 
composto da due set, uno di default 
e uno alternativo. Il set di default 
per NORMAL.SET è identico ai ca¬ 
ratteri del video normale (testo) di 
Apple II; il secondario contiene inte¬ 
ressanti simboli grafici. Il discorso 
per il set primario di SCIENTI- 
FIC.SET è equivalente, mentre nel 
set alternativo si trovano simboli 
matematici, logici ed elettronici, più 
altri caratteri grafici. NOR¬ 
MAL.SET è l’unico set realmente 
necessario al programma; se non sie¬ 
te interessati ai simboli scientifici, 
SCIENTIFIC.SET può essere trala¬ 
sciato. 

I caratteri prodotti con CHAR.ED 
sono nello stesso formato di quelli 
realizzati grazie all’Apple Program¬ 
merà Tool Kit. La differenza sta nel 


fatto che il set di Fucina di Font è e- 
sattamente il doppio rispetto al Tool 
Kit Apple. E’ perciò possibile carica¬ 
re un set di caratteri del Tool Kit nel 
CHAR.ED, ma esso modificherà so¬ 
lo il primo dei due set disponibili. Il 
secondo rimarrà invariato rispetto al¬ 
l'operazione di caricamento. 

Immissione dei programmi 

Per l’utilizzo dei programmi, anzi¬ 
tutto digitate il programma Apple¬ 
soft del listato 1 , quindi memoriz¬ 
zatelo con: 


SAVE CHAR.ED 


Se avete a disposizione un assem¬ 
bler, potete digitare il listato 2 e 
quindi assemblarlo. Altrimenti, en¬ 
trate in Monitor con CALL -151 e 
digitate la parte esadecimale. Quindi 
memorizzatela su disco con: 


BSAVE CHAR.GEN, A$8C00, 
L$3B2 


Quindi ripetete l’operazione con il 
listato 3 e salvatelo con: 


BSAVE NORMAL.SET, A$9000, 
L$600 


Se desiderate i simboli scientifici, 
digitate il listato 4, seguito da: 


BSAVE SCIENTIFIC.SET, 
A$9000, L$600 


Per ottenere un aiuto nelfintrodu- 
zione dei programi, consultate le pa¬ 
gine "Per chi comincia", su questa ri¬ 
vista. 

Come funziona f editor 

L'editor presentato nel listato 1 ini¬ 
zia posizionando HIMEM, al fine di 
proteggere la memoria, dalla locazio¬ 
ne $8C00 in su (linea 80). HIMEM 
è effettivamente settato a $8800 
(34816 in decimale) per permettere 
$400 byte al buffer generale del Pro- 
DOS. Se il vostro programma non 
funzionerà sotto ProDOS, e avete ve¬ 
ramente bisogno di un po' di spazio 
in più, potete settare HIMEM a 
35840. 

Quindi viene posizionato il vetto¬ 
re di errore e caricato il set dei carat¬ 
teri standard. Il generatore di caratteri 
è caricato alla linea 110, e la CALL 
35840 lo inizializza. E’ molto inte¬ 
ressante la linea 120: essa controlla 
la locazione 48896; se contiene 76, 
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allora il ProDOS è attivo, e quindi 
l'input e l'output sono reindirizzati 
alle routine interne al generatore di 
caratteri. 

Le linee dalla 130 alla 250 inizia- 
lizzano un certo numero di varibili e 
array.; quelle dalla 260 alla 350 mo¬ 
strano il menù principale. Alle linee 
370-400 si attende che l'utente pre¬ 
ma un tasto comando, dopodiché si 
salterà alle appropriate routine. Le li¬ 
nee 410-600 disegnano lo schermo 
di editing e attendono la pressione di 
un tasto. Le linee da 630 a 710 gesti¬ 
scono la duplicazione di un carattere, 
mentre quelle da 720 a 800 lo scam¬ 
bio di due caratteri. Le linee 810- 
830 si preoccupano di memorizzare 
il set di caratteri su disco; simmetri¬ 
camente si trova alle linee 890-910 
il caricamento. 

Le linee 930-1010 mostrano le i- 
struzioni. Le linee da 1020 a 1040 
visualizzano il catalog sia del drive 
1 sia del 2. Le linee 1060-1290 dise¬ 
gnano un carattere ingrandito per l'e¬ 
diting, gestiscono il movimento del 
cursore e l’inserimento o cancellazio¬ 
ne dei singoli pixel. Alle linee 1300- 


1320 viene eseguita la scrittura della 
stringa "Premere Return per conti¬ 
nuare" a fondo dello schermo, segui¬ 
ta dalla attesa di un carattere da tastie¬ 
ra. 

Alle linee 1330-1390 si gestisce 
l'input del nome del file, sia per la 
sua memorizzazione che per il suo 
caricamento da disco. Infine, alle li¬ 
nee 1410-1510 si trovano le istruzio¬ 
ni necessarie alla gestione degli erro¬ 
ri. 

Come funziona il generatore 

La routine CHAROUT (linee 321- 
347) è quella principale di output e 
si preoccupa delle visualizzazioni dei 
caratteri sullo schermo Hi-Res. Essa 
inizia salvando tutti i registri, quindi 
plottando un carattere chiamando 
PLOTCHAR (alla linea 399). Se il 
carattere è un Return la routine con¬ 
trolla la necessità di effettuare uno 
scroll, gestito con la chiamata a 
SCROLL (linea 349). Dopo tali ope¬ 
razioni vengono ripristinati i registri 
e si torna al chiamante. 

La routine CHARIN (linee 469- 
546) gestisce tutti gli input di carat¬ 


ATTENZIONE! 

I listati sono 
pubblicati alle 
pagine 93-101 


teri. Dopo aver salvato i registri, at¬ 
tende che sia premuto un tasto, prele¬ 
va il carattere, spegne il cursore ed e- 
samina la locazione di memoria 
$FBB3. Questa locazione contiene 
$06 se il sistema è un Ile o un Ile, 
un altro valore se si tratta di un Ap¬ 
ple II Europlus. Se si tratta di uno 
dei primi due sistemi, il resto della 
routine è saltato. Le linee da 480 a 
543 eseguono tutte le conversioni da 
maiuscole a minuscole e gestiscono 
le opzioni accedibili con i tasti Shif- 
t, Escape e Control su Apple II Eu- 
roPlus. 

^ Questo programma è disponibile ^ 
su dischetto. L’elenco, i prezzi 
e le modalità d’ordine di questo 
e degli altri dischetti disponibili 
sono riportati nella rubrica 
V Disk Service. 
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Insieme alla calcolatrice, all'archivio appunti, 
al puzzle e agli altri accessori, ora é possibile 
inserire nell'opzioni mela di un qualsiasi pro¬ 
gramma del Macintosh anche MacTel, un com¬ 
binatore telefonico che permette di gestire una 
rubrica e di fare automaticamente la telefonata 
a un abbonato memorizzato. MacTel vi per¬ 
mette di compone un numero telefonico anche 
quando state lavorando con il Mac: basta at¬ 
tivare MacTel dal menù mela, selezionare la 
persona che si vuol chiamare, richiudere 
MacTel e continuare il proprio lavoro. Se l'u¬ 
tente da voi selezionato ha la linea occupata 
non c'é da preoccuparsi: MacTel é instancabile 
e richiamerà lo stesso numero fino a che non 
lo troverà libero. 

Oltre a ciò é anche possibile programmare una 
telefonata: arrivati al giorno ed orario stabiliti, 
qualsiasi cosa stiate facendo, MacTel vi av¬ 
viserà chiedendovi di confermare o meno la 
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chiamata. 

Prezzo (Hardware compreso): 
£ 189.500 


«*%** ********* 



Se vuoi ordinare MacTel invia 
questo tagliando a: 

Micro Progettazione Avanzata 
Via del Boschetto, 40/C 
00184 Roma 

Nome- 

Cognome_ 

Società- 


Indirizzo- 

Cap_Città 

Tel_ 

[_Firrria^ _ __ 


MacTel é prodotto e distribuito dalla 


M 


M 


Progettazione 


Ricerca e sviluppo software 































er la prima volta, il Vostro 
Macintosh può condividere 
documenti e periferiche con il 
Vostro IBM PC o compatibile; così, non 
è necessario avere nel Vostro ufficio 
solo Mac o PC. TOPS la sola rete di 
lavoro locale che collega i Macintosh ai 
PC, è la sola che permette una 
comunicazione in "tempo reale’’ tra 
questi sistemi operativi. 




La rete di lavoro 
per condividere 
Macintosh" 

el’IBM® 


MACINTOSH è marchio registrato dalla Apple Computer 

IBM è marchio registrato dall$ International Business Machines Corp. 


Via Morazzone, 8 21100 VARESE 
Tel. (0332) 236336 


a Compatibilità di TOPS 

TOPS è compatibile al 100% con la rete 
AppleTalk. Per la prima volta, potrete 
accedere e lavorare con documenti 
residenti su dispositivi remoti, 
esattamente come se fossero sul Vostro 
calcolatore, non importa con quale 
sistema operativo. Per esempio, potete 
lavorare con i Vostri documenti creati 
con Lotus 1-2-3 su IBM e modificarli 
sul Vostro Macintosh usando Microsoft 
Excel e poi registrarli su disco rigido 
remoto IBM! 


La Versatilità di TOPS 

TOPS Vi dà tre reti di lavoro in una: 
Macintosh con Macintosh, Macintosh 
con PC, PC con PC. TOPS è il solo "file 
server” disponibile per reti di 
Macintosh. E TOPS lavora con tutti i 
dischi rigidi disponibili per Macintosh. 
TOPS è l’unica rete di lavoro che dà la 
possibilità agli utenti Macintosh di avere 
la protezione dei documenti. 

TOPS rende gli IBM PC "trasparenti” ai 
Macintosh e viceversa. Per gli utenti 
l’utilizzo di TOPS non comporta alcun 
cambiamento nell’uso dei programmi o 


nelle funzioni del calcolatore, non sono 
necessarie procedure particolari per 
accedere a programmi o documenti 
remoti. Per una completa funzionalità 
nella rete di lavoro, TOPS è il più facile 
da installare e da usare. 


La Convenienza di TOPS 

TOPS elimina il bisogno di avere un 
costoso "file server”. Ogni Mac o PC 
può essere un "file server” o utente allo 
stesso momento. Altre reti di lavoro 
che, non sempre possono dare queste 
prestazioni, costano molto di più di 
TOPS. 

TOPS permette al Vostro IBM di 
"parlare la stessa lingua” del Vostro 
Macintosh. 


L’Integrazione di TOPS 

TOPS Vi dà la possibilità di integrare 
totalmente il Vostro PC con la rete 
AppleTalk: con il software TOPS Print 
permetterete al Vostro PC di stampare 
direttamente sulla stampante Apple 
LaserWriter! 

Tramite il software che utilizzate 
normalmente sul Vostro IBM PC, sarà 
sufficiente impostare la stampa per una 
stampante Epson, perchè al resto 
penserà TOPS Print che "catturerà” la 
stampa trasformandola in postscript per 
gestire la LaserWriter. 

I Vantaggi di TOPS Print 

Oltre ai vantaggi dell’altissima qualità di 
stampa Laser, potrete collegare più di un 
PC e Macintosh in rete AppleTalk, per 
sfruttare la stessa stampante LaserWriter. 


TOPS è prodotto dalla 
Centram System West, Ine. USA 

Per informazioni rivolgetevi al 
Vostro rivenditore di fiducia 

Distribuito da: 



















Costruire in proprio un’antenna può essere un’esperienza 
entusiasmante, ma il terreno in cui bisogna 
avventurarsi per farlo è spesso insidioso. Questo 
programma vi aiuta a determinare le misure ottimali. 


Quanta potenza 
in giardino? 


Questo programma, esistente sia 
in versione Apple II sia in versione 
Macintosh, sarà utile a chi si interes¬ 
sa di problemi elettrici e radio in ge¬ 
nerale, a cominciare dai radioamato¬ 
ri, che spesso chiedono se sia possi¬ 
bile utilizzare il computer per appli¬ 
cazioni un po' più specifiche. Il pro¬ 
gramma permette il calcolo e la 
stampa dei dati meccanici (per le an¬ 
tenne verticali anche elettrici) per la 
realizzazione di antenne su frequenze 
desiderate. 

La quantità dei dati forniti non è ri¬ 
dondante, ma non è stato tralasciato 
nulla affinché anche il principiante 
possa avventurarsi nel campo, insi¬ 
dioso ma affascinante, dell’autoco- 
struzione e determinare a priori la 
gamma di frequenza dove l'antenna 
deve lavorare con il massimo guada¬ 


gno. Per le antenne logaritmiche in 
particolare il calcolo ovviamente 
non è stato esteso a una funzione 
continua, che rendesse i risultati dal¬ 
la peggior antenna all’antenna con 
massimo rendimento, ma teorica. E' 
stato scelto un range ottimale per le 
varie applicazioni, considerando im¬ 
pensabile che un autocostruttore pos¬ 
sa avventurarsi nella realizzazione di 
antenne con dimensioni superiori ai 
dieci metri di boma, anche perché a 
queste frequenze è forse più utile un 
dipolo appropriato o più dipoli, che 
offrono rese maggiori con minor 
spesa. 

Le varie curve, relative specialmen¬ 
te al fattore k di accorciamento, aven¬ 
do delimitato il campo a richieste re¬ 
ali, sono state assimilate alle rette 
con approssimazioni trascurabili, 


poiché tutte le misure sono in mm. 

Nel programma è inserita, oltre ai 
vari controlli di errore accidentale 
nella battitura dei dati, una verifica 
che determina automaticamente, otti¬ 
mizzando il guadagno, il numero mi¬ 
nimo e massimo degli elementi di 
un'antenna (provate a chiedere un’an¬ 
tenna con 35 elementi...). 

Le antenne verticali, utilissime 
per chi spesso è angosciato da pro¬ 
blemi condominiali e di spazio, han¬ 
no il difetto di risultare degli ottimi 
fili di ferro se non vengono realizza¬ 
te nel modo migliore e con occhio 
critico verso impedenze e adattamen¬ 
ti. 

Al futuro realizzatore si presenterà 
una tabella che lo informerà dei vari 
problemi di adattamento di impeden¬ 
za e dei fattori di perdita, in funzione 
delle dimensioni dei materiali che de¬ 
sidera utilizzare. 

Purtroppo non tutti posseggono 
ampi giardini dove erigere tralicci a - 
datti a favolose direttive quasi-profes- 
sionali, ma con un po' di buona vo¬ 
lontà, calcoli e prove si può arrivare 
al proverbiale compromesso che vi 
permetterà di collegare il paese raro 
del quale eravate alla ricerca da 
tempo, ed aggiungere così un nuovo 
trofeo tra le vostre QSL. 

Dopo l'antenna, esiste un altro e 
non meno importante problema dal 
quale dipende il rendimento ottimale 
stesso di tutto rimpianto: l'adatta¬ 
mento di impedenza Antenna - Cavo - 
RTX. 

Il fatto di avere dei disadattamenti 
di impedenza causa dei problemi non 
certo trascurabili (disturbi ai telefoni 
dei vicini e condomini) e quantifica¬ 
re i valori in gioco può rendere più 
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Calcolo dell’ SWR con il programma per Macintosh 
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Calcolo di un DIPOLO per 29 MHZ con il programma per Apple. 


chiari i vari fenomeni. Non è raro 
che un radioamatore trasmetta con 
varie centinaia di watt; nulla da dire, 
visto che concessioni ministeriali 
consentono un limite di 300 watt di 


ingresso per le frequenze da 3.5 a 30 
Mhz, ma utilizzando il programma 
relativo alle potenze si potrà vedere 
qual è, ai vari valori di SWR, la po¬ 
tenza persa e riflessa. Così, come 


naturale complemento al programma 
per la progettazione delle antenne, 
troverete nel dischetto il programma 
per il calcolo delle potenze. 

Il programma Potenze funziona 
sia per l’Apple II sia per il II GS ed 
è stato rielaborato anche per il Ma¬ 
cintosh, dove ovviamente la diversa 
possibilità grafica permette di rende¬ 
re più elegante la rappresentazione. 

Si deve ricordare che l'S WR, essen¬ 
do un rapporto, avrà sempre come 
valore limite 1, e anche questo è un 
valore puramente teorico. 

La rappresentazione grafica non su¬ 
pera SWR = 4 poiché in condizio¬ 
ni normali non solo non è pensabile 
superare quel valore, ma si deve an¬ 
che lavorare con rapporti nettamente 
inferiori. 

^ Questo programma è disponibile ^ 
su dischetto. L’elenco, I prezzi 
e le modalità d’ordine di questo 
e degli altri dischetti disponibili 
sono riportati nella rubrica 
. Disk Service. , 



Esiste un centro dove puoi comprare 
un sistema Apple, scegliere software per Apple, 
consultarti con esperti Apple, vedere le novità Apple, 
frequentare corsi Apple, affittare un sistema Apple 
e sottoscrivere uno speciale contratto di 
manutenzione. Questo centro si chiama 





Gli specialisti di problematiche industriali e professionali 
(ora anche su Macintosh II) 


Grandi affari estate 


Eccezionali offerte su tutto l'hardware dal 1 giugno al 31 luglio 

Polisistemi S.r.l. Via Derno, 19 - 20132 Milano - 
Tel 28.42.890 / 26.13.158 / 28.29.917 





































Se già possedete un 
Macintosh™ ed una Laser Writer™ 
congratulazioni. State infatti 
utilizzando i due strumenti più 
produttivi del Desktop Publishing. 
Ma se volete lavorare in modo 
realmente professionale, avete 
k bisogno di un terzo strumento: il 
Radius Full Page Display™. 

Vedere l’intera pagina. 

Poiché FPD (Full Page Display) 
vi permette di vedere un’intera 
pagina A4, elimina virtualmente il 
bisogno di scorrere le pagine 
avanti e indietro per poter correg¬ 
gere il vostro lavoro. Vedendo 
l’intera pagina sullo schermo, 
sarete immediatamente in grado di 
comprendere come risulterà il 
documento stampato, riducendo il 
bisogno di stampe di prova. 


In questo modo è molto più 
facile creare, impaginare e pubblica¬ 
re documenti. Inoltre, FPD 
permette allo schermo del vostro 
Macintosh di rimanere attivo. 
Potrete lavorare sullo schermo FPD 
ed allo stesso tempo porre docu¬ 
menti aggiuntivi, finestre con gli 
strumenti di lavoro o accessori 
della scrivania, sullo schermo del 
Macintosh. Oppure, utilizzando 
i due schermi singolarmente, 
lavorare su videate continuative 
per grandi documenti orizzontali 
e persino trasferire testi e grafici 
da uno schermo all’altro. 


Il migliore come design 
e come tecnologia. 

FPD è stato disegnato da sei 
membri del gruppo originale che 
ideò Macintosh. Lo stesso designer 


creò l’elettronica digitale per gli 
originali Macintosh, LaserWriter e 
FPD. Con tutta questa esperienza 
in comune, potete essere certi di 
ottenere un prodotto di massima 
qualità, non ottenibile altrove. 
FPD può essere installato presso il 
vostro Apple Center di fiducia, 
non richiede software aggiuntivo 
ed è subito compatibile con il 
software standard per Macintosh. 

FPD esiste nelle versioni per 
Macintosh Plus e Macintosh SE. 

radiis 

Distributore esclusivo di Radius 
FPD per l’Italia: 



Via Emilia S. Stefano, 38 
REGGIO E. Tel. 0522/485845-6-7 


Il Monitor più Evoluto 
per Lavorare a Tutta Pagina 



THE RADIUS REPORT 
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pubhshmg Applications run 
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Radius Full Page Display is a trademark of Radius, Ine. Macintosh is a trademark of Apple Computer, Ine. Laser Writer is a registered trademark of Apple Computer, Ine. © 1987 Radius, Ine. 



























SOFTWARE 


Per sfruttare in pieno le caratteristiche del Macintosh, un data base deve 
saper aggiungere a potenza flessibilità d'uso ed eleganza grafica. Ci riesce 
in questo File Maker Plus, ora distribuito anche in Italia. 


Un data base con 
qualcosa in più 



Una delle applicazioni più tipiche 
alle quali è adibito.un personal com¬ 
puter, assieme a elaborazioni di testi 
e calcoli di vario genere, è senza dub¬ 
bio costituita dall'archiviazione di da¬ 
ti, Un programma per la gestione di 
archivi (o Data base, per utilizzare la 
denominazione inglese ormai entrata 
nell'utilizzo comune), deve necessa¬ 
riamente essere dotato di una serie di 
opzioni che consentano un efficiente 
inserimento e una rapida ricerca dei 
dati, e può arrivare a livelli di com¬ 
plessità e sofisticazione molto eleva¬ 
ti, come è il caso di DBase III Plus 
o RBase System V in standard MS- 
DOS. Questi programmi permetto¬ 
no di creare vere e proprie applicazio¬ 
ni a sé stanti, in grado di risolvere ef¬ 
ficacemente problemi particolari e di¬ 
versificali. 

In ambito Macintosh, i prodotti 
più interessanti sono naturalmente 
quelli che permettono di sfruttare al 
meglio le vaste possibilità grafiche 


e l'interfaccia utente della macchina, 
abbinando una buona potenza con u- 
na particolare flessibilità e facilità 
d'uso. Uno di questi è certamente Fi¬ 
leMaker Plus, prodotto dalla america¬ 
na Forethought e commercializzato 
in Italia dalla Elcom di Gorizia. 

Come funziona 
FileMaker Plus 

La caratteristica che 
maggiormente colpisce 
di questo programma è 
appunto la capacità di 
utilizzare le potenzia¬ 
lità grafiche proprie 
del Mac, sia per 
sveltire e sempli¬ 
ficare l'immis¬ 
sione dei dati, 
sia soprattutto 
per creare 
schede, rap¬ 
porti, e 


relazioni in fase di stampa, inseren¬ 
do immagini e disegni. Filemaker 
Plus è infatti in grado di gestire, co¬ 
me input per i campi, testo (fino a 
un massimo di 32.767 caratteri), nu¬ 
meri, date, e immagini, anche digita- 
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é Archivio Componi 


| formato Carillon stile 


fff 

Definizione dei Campi 

Il risultato del calcolo è di tipo (•> Numerico 
Ualore Magazzino = O Data 

Quantità * Prezzo] 


Prodotto 

Quantità 

Ultimo acquisto 
Prezzo 

<> 

0000 

0000 

0000 

0000 

> 

< 

1 

i 

<> 

ass 0 

medio () _ 

conta () 
data („) 
giorno 0 

FU <„) g 







<> 

[ OK 

J [ Annulla ] 


Un esempio di input di un campo calcolato. 


[0 

Archioio Componi | 

jRo<es*ori formato Carotieri 

Siile ] 


i 

Definizione dei Campi 




Prodotto 

Testo 

<> 



Quantità' 

Numero 




Ultimo acquisto 

Data 




Prezzo 

Numero 




Ualore magazzino 

* Quantità' * Prezzo 




Indice rotazione 

= media (Ultimo acquisto) 




Logo prodotto 

Figura 








Nome del campo: 

Tipo del campo: [(lozioni introduzione! 1 



O Testo 36T 

— 




O Numerico 86N [ Modifica 

J 



OOate 960 , - - 

—^ 



(5) Immaqine 86P [ Libera ] ( !)K 

J 



O Calcolato 86C a-\ /- 

— . 



O Riassunto 36S l Limóna j ( Es^i J | 


Un esempio di scheda con campi di testo, calcolo, data e immagini. 



Gii strumenti per definire i layout desiderati 


lizzate. Un campo definito come te¬ 
sto può contenere qualsiasi tipo di 
informazione; è supportata anche u- 
na funzione di ritorno a capo automa¬ 
tico a fine linea; le parole inserite 
vengono indicizzate, in modo da po¬ 
ter eseguire su ognuna di esse ricer¬ 
che e ordinamenti di vario genere. I 
numeri devono essere invece conte¬ 
nuti in uriunica linea; è possibile 
scegliere il numero di cifre decimali 
visualizzate, oltre a eseguire anche 
in questo caso ordinamenti ascenden¬ 
ti e discendenti. 

Le immagini sono trasportate al- 
l’interno del data base attraverso la 
clip board; vengono accettati per e- 
sempio disegni creati con MacPaint 
o MacDraw, o foto digitalizzate con 
ThunderScan, MacVision, o altri 
scanner che utilizzano gli stessi prin¬ 
cipi. Sono gestibili anche campi cal¬ 
colati, utilizzando formule che preve¬ 
dono totalizzazioni e operazioni sia 
all'interno di un record, sia fra record 
diversi. Le numerose funzioni dispo¬ 
nibili sono di tipo matematico, stati¬ 
stico, finanziario e logico. 

Controllo degli errori e ricerca 

E’ possibile fare in modo che il 
programma esegua controlli sulla 
correttezza dei dati inseriti, rendendo 
in questo modo più sicuro il lavoro 
di digitazione. Alcune informazioni, 
specialmente di tipo ripetitivo, ven¬ 
gono poi inserite automaticamente 
aH’interno dei campi specificati. 
Non esiste alcun limite al numero 
dei record e dei campi utilizzati, sal¬ 
vo quello relativo allo spazio su di¬ 
sco disponibile. La flessibilità del 
programma è dimostrata anche dalla 
capacità di aggiungere, modificare o 
rimuovere campi in qualunque mo¬ 
mento, ricordando anche che non è 
necessario stabilire a priori la dimen¬ 
sione del campo stesso. 

Abbastanza potenti e varie si dimo¬ 
strano poi le opzioni di ricerca, che 
sono condotte per chiavi multiple, a- 
prendo contemporaneamente, se ne¬ 
cessario, fino a un massimo di otto 
file contemporaneamente. Sono ricer¬ 
cabili valori che si trovano all'inter¬ 
no di un certo intervallo, oppure 
maggiori, minori o uguali di un nu¬ 
mero fissato; campi vuoti, o conte¬ 
nenti date sbagliate; termini e frasi 
di ogni tipo. 

Aperto, flessibile e ricco 

Un altro aspetto interessante ri¬ 
guarda lo scambio dati con altri pro- 


28 



















































































































-Syllabae- 

runico programma di sillabazione che permette 
la manipolazione del testo già formattato. 

Avrete già provato altri program- ker? Allora potete sillabare un intero 
mi di sillabazione. Ma prima di sii- testo o solo poche righe direttamente 
labare un articolo, una relazione, u- dal programma di impaginazione 
na lettera, dovevate salvarli come fi- della Aldus. 

le di testo: in parole povere, se aveva- Per finire, un'altra piacevole sor¬ 
te già predisposto corpi, caratteri, ne- presa. Il prezzo. Solo 150.000 lire, i- 
retti, corsivi, eccetera, vi perdevate va compresa, nei migliori computer¬ 
tutto e dovevate ricominciare dacca- shop. Oppure richiedetelo direttamen- 
po. Con Syllabae questo appartiene te utilizzando il coupon di questa pa- 
al passato. Non solo. Usate PageMa- gina. 

Syllabae è un prodotto Micro Progettazione Avanzata, distribuito in esclusiva da Editronica srl. 


Ritagliare, compilare e spedire a: Editronica Srl, Corso Monforte 39,20122 Milano. 

Desidero ricevere, senza aggravio di spese postali, il programma Syllabae al prez¬ 
zo di L. 150.000, con la seguente formula di pagamento (barrare la casella di pro¬ 
prio interesse). 

□ Allego assegno non trasferibile di L. _ intestato a Editronica Srl 

□ Allego ricevuta di versamento di L. -sul CC postale n° 19740208 

intestato a Editronica Srl, Corso Monforte 39,20122 Milano. 

□ Pago fin d’ora con la mia carta di credito Bankamericard n°_ 

scadenza_ 

Cognome e Nome_ 

Via_n°_ 

Cap_Città_Prov_ 

Data_Firma_ 


















grammi: FileMaker Plus è predispo¬ 
sto per il trasferimento di file con 
Microsoft Excel, oltre ad accettare te¬ 
sti in formato ASCII, file Basic e di¬ 
segni creati da MacPaint e Mac- 
Draw. 

Il punto di forza maggiore è co¬ 
munque costituito dall'estrema flessi¬ 
bilità con cui è possibile creare il 
layout di una scheda (ossia di un re¬ 
cord), dopo che i campi sono stati de¬ 
finiti. Vengono accettati anche più 
layout diversi per lo stesso record. I 
campi, il testo o i grafici possono 
essere sistemati in qualsiasi posizio¬ 
ne all'interno della pagina, mentre 
un quadrato contenente quattro stru¬ 
menti è sempre disponibile sulla si¬ 
nistra del video. L’icona che rappre¬ 
senta una freccia, viene abilitata 
quando si desidera selezionare, spo¬ 
stare o modificare le dimensioni di 
qualunque componente del layout vi¬ 
sualizzato. Le altre consentono ri¬ 
spettivamente di aggiungere, cambia¬ 
re o rimuovere una porzione di te¬ 
sto; di tracciare linee atte a creare 
suddivisioni all'interno del layout; di 
disegnare quadrati e rettangoli di va¬ 


rie dimensioni. Si possono inoltre u- 
sare vari font in più dimensioni e sti¬ 
li, per rendere ancora più efficace 
l'aspetto finale della pagina. In fase 
di stampa sarà rispettata l'imposta¬ 
zione data al layout, che può essere 
studiato anche in maniera tale da ac¬ 
cogliere un rapporto in formato co¬ 
lonnare. E’ disponibile un'opzione 
che consente di mostrare sul moni¬ 
tor il documento esattamente nello 
stesso modo in cui verrà poi stampa¬ 
to. 

Il concetto di layout, memorizzabi- 
le indipendentemente dai dati conte¬ 
nuti, permette di creare maschere pre¬ 
definite (template, secondo la defini¬ 
zione in lingua inglese), che posso¬ 
no essere richiamate, completate e u- 
tilizzate per gli impieghi più dispara¬ 
ti. Con FileMaker Plus si realizzano 
per esempio moduli completi di mar¬ 
chio e intestazione per ordini, inven¬ 
tari, comunicazioni interne, rapporti 
aziendali, fino a spingersi nel campo 
contabile con fatture e consuntivi fi¬ 
nanziari. E' questo un aspetto parti¬ 
colarmente interessante, considerato 
anche che il programma gestisce sen¬ 


za problemi la LaserWriter, per una 
stampa di elevata qualità. 

Si tratta quindi nel complesso di 
un data base molto portato alla ge¬ 
stione della grafica e della comunica¬ 
zione visiva, e inoltre contraddistin¬ 
to da una semplicità ed elasticità d'u¬ 
so notevole. Si adatta con minore 
efficacia alle esigenze di coloro che 
necessitano di un vero data base rela¬ 
zionale con potenti funzioni di ricer¬ 
ca e di concatenazione fra i dati, o 
che cercano un generatore di applica¬ 
zioni per scopi particolari. 

Non mancherà comunque di forni¬ 
re notevoli soddisfazioni a tutti gli u- 
tenti, rappresentando un passo avan¬ 
ti notevole nel campo dell'archivia¬ 
zione delle informazioni, considerato 
anche il rapporto prezzo/prestazioni 
assai favorevole: costa infatti lire 
415.000 + Iva. Gira su tutti i Macin¬ 
tosh con almeno 512K di memoria e 
un disk drive da 800K o due drive da 
400K. 

FileMaker Plus è distribuito in Ita¬ 
lia dalla Elcom, Corso Italia 149, 
Gorizia, telefono 0481 30909. 

Stefano Minotto 
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dei nuovi uffici in 
Via del Boschetto, 40/C 
àngolo Via Nazionale) 
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Migliorate il vostro lavoro col computer 

dall’oggi al domani. 


I vostri problemi col computer hanno le ore contate. 
Grazie al catalogo Misco, che vi offre gli articoli delle 
migliori marche ai prezzi più vantaggiosi e ve li porta 
direttamente in ufficio entro 24/48 ore. 

Provatelo. Non potrete più farne a meno. 


Con il catalogo Misco, tutti gli 
accessori per il computer 

IN 24 ORE! 


Una scelta ben orientata 

Misco Glideaway vi libera la scrivania e vi per¬ 
mette di orientare il monitorin ogni direzione. 
Chiedetelo in “prova senza rischi” per 30 
giorni. 


Dischi da... hit parade! 

3v Dysan, Verbatim, Memorex, Nashua, Oli- 
: tutte le migliori marche con garanzia 
y ...pietà e consegna immediata. A partire da 
s ;.ie 3.000 lire. ' 


Attenzione, non perdete il controllo! 

Broakout Box è uno dei tanti Tester esclusivi 
Misco. Facile da usare grazie al visual display, 
è assolutamente necessario per verificare 
tutte le connessioni di interfaccia V24. 


Fatevi spazio in ufficio! 

Risolvete i vostri problemi di spazio con la nostra Workstation Compact: resterete 
sorpresi dalle sue ridottissime dimensioni e... dal suo ridottissimo prezzo. 
Ordinateli oggi per riceverla domani, già montata e pronta per l’uso. 


Sdraiato o in piedi... sulla vostra scriva¬ 
nia! L’intelligente struttura a cavalletto, er¬ 
gonomica e salvaspazio, 
di Misco Space Box of¬ 
fre una soluzione nuo¬ 
va al vecchio pro¬ 
blema dell’ar¬ 
chiviazione dei 
floppy. A partire 
da 65.000 lire. 


Azienda 


Settore 


essere da video? Pronto 
intervento Misco! 

Occhi arrossati, mal di testa, affa¬ 
le .mento: contro questi danno¬ 
si affetti video” ordinate i no¬ 
stri Schermi Antiriflesso, per 
mi ìiorare produttività ed effi¬ 
cienza. 


Cognome_ 

Posizione all’interno dell’Azienda 


r 


Se non l’avete ancora fatto, chiedete subito L’ABBONA¬ 
MENTO GRATUITO AL CATALOGO MISCO telefonando o 
inviando questo coupon a: Misco Italy Computer Supplies S.p.A. 
Il Girasole U.d.V.2-01 - 20084 Lacchiarella Milano 


Sì, 


inviate GRATIS 


02/900151 

catalogo Misco a: 


CAP. 
Prov_ 


Località. 


. Telefono. 


Marca e modello del computer 

Inviare all’attenzione di: 

Nome_ 


IK1412171 











































UTILITY 



Questa breve routine in LM, dai semplici comandi, permette 
di evidenziare tutte le presenze di qualunque parola chiave in un listato 
in Applesoft. In DOS 3.3, per un Apple con almeno 64K di RAM, 
Inverse Keywords vi aiuterà a progettare 
il vostro programma preferito o a farne il debugging. 

Parole chiave 
in campo inverso 


Le parole chiave sono parole riser¬ 
vate immagazzinate in forma di to- 
ken nella memoria del programma. 
Nei listati dei programmi in Apple¬ 
soft è spesso utile evidenziare una de¬ 
terminata parola chiave. Per esem¬ 
pio un’istruzione REM è più facile 
da localizzare se il REM è evidenzia¬ 
to. Le dichiarazioni condizionate (IF- 
THEN) e i loop (FOR-NEXT) sono 
oggetto di frequente esame, e può 
darsi che li vogliate isolare eviden¬ 
ziandoli. Inoltre l’evidenziamento po¬ 
trebbe essere usato come aiuto per 
individuare ed escludere le istruzioni 
GOTO non strutturate. 

Come risolvere il problema 

Inverse Keywords, parole chiave 
in campo inverso, è un programma 
in linguaggio macchina che richiede 
la ROM dell’Applesoft sulla mother- 
board e una configurazione di 64 Kb 
(o maggiore). La definizione esatta 
dei 16 Kb supplementari è memoria 
a commutazione di banco (BSM, 
bank-switched memory). L’Apple Ile 
e l'Apple Ile hanno la BSM incorpo¬ 
rata, mentre per l’Apple II Plus la si 
può ottenere mettendo una scheda 
RAM nello slot zero. 

I comandi del programma 

Dopo aver fatto BRUN INVER- 
SE.KEYWORDS, la pressione di 
CTRL-K (della freccia in su sul Ile e 
sul Ile) fa comparire la richiesta di 
introduzione della parola chiave che 
volete evidenziare. Se rispondete al 
messaggio ”KEYWORD=> ” con u- 
na parola chiave valida, ricompare il 
prompt delFApplesoft, e la parola 
chiave specificata appare in inverse 
nei listati di programma. Un'introdu¬ 


zione non valida fa comparire il mes¬ 
saggio "BAD KEYWORD" e disatti¬ 
va il modo evidenziamene, che può 
essere ristabilito solo introducendo u- 
na parola chiave giusta. Se risponde¬ 
te a "KEYWORD=>" premendo 
Return compare la parola chiave atti¬ 
va se è attivo il modo evidenziamen- 
to, mentre se l'evidenziamento è di¬ 
sattivato non viene emesso nulla. Si 
può evidenziare una sola parola chia¬ 
ve alla volta. Quando selezionate per 
l'evidenziamento una nuova parola 
chiave questa prende il posto di quel¬ 
la vecchia. 

Premendo CTRL-J (la freccia in 
giù sul Ile e sul Ile) si stampa Off, 
il che segnala che il modo evidenzia¬ 
melo è stato disattivato. Premendo 
Reset si riattiva l'evidenziamento so¬ 
lo se era stato attivato con una paro¬ 
la chiave valida. Un listato su carta 
dev’essere sempre preceduto da 
CTRL-J perché la maggior parte del¬ 
le stampanti non vede di buon oc¬ 
chio i caratteri inverse, che di solito 
rappresentano comandi per la stam¬ 
pante. Il terzetto dei comandi è com¬ 
pletato da CTRL-Z. Premendo que¬ 
sto tasto: 


1. Si produce il messaggio "ZAPI". 

2. Si scollega in permanenza il pro¬ 
gramma. 

3. Si ripristinano i vettori di input, 
il vettore di reset e HIMEM ai valo¬ 
ri esistenti prima del BRUN del pro¬ 
gramma. 


E’ tutto qui. Attenzione: badate a 
disattivare l'evidenziamento quando 
volete editare una linea usando il mo¬ 
do Escape. Le parole chiave eviden¬ 
ziate saranno inserite come caratteri 


di controllo in qualsiasi linea copia¬ 
ta dallo schermo. 

Come si introduce 

Usate un Assembler o il Monitor 
per digitare il programma come indi¬ 
cato nel listato 1. Per avere aiuto 
nell'introduzione dei listati di Appli¬ 
cando si veda "Per chi comincia" in 
questo numero della rivista. Per sal¬ 
vare il programma sul dischetto scri¬ 
vete: 


BSAVE INVERSE.KEYWORDS 
A$9353,L$2AB 


Scrivete BRUN INVERSE.KEY- 
WORDS, si installerà il programma 
sotto i buffer del DOS e si riporterà 
la memoria da 38400 ($9600) o più 
a 37888 ($9400). Dato che il pro¬ 
gramma non è rilocabile, il valore di 
HIMEM pre-eseguito indicato sopra 
può essere modificato solo riassem¬ 
blando il programma a un’origine in¬ 
feriore; un altro dei vantaggi dell’as¬ 
semblaggio del codice rispetto all’in- 
troduzione manuale. 

Come funziona il programma 

• L'installazione. La riuscita 
dell’installazione dipende dall'adempi¬ 
mento delle esigenze indicate nelle li¬ 
nee 8-10 del listato 1. Le linee 58- 
64 assicurano che HIMEM non sia 
inferiore a $9600. Le linee 68-75 a - 
bilitano la ROM della motherboard 
e leggono il contenuto del punto 
d'ingresso della partenza a freddo del 
Basic ($E000). Trovando in questa 
locazione $4C si è sicuri che l’Ap- 
plesoft è attivato (con l’Integer Basic 
vi si troverebbe $20). Le linee 79- 
93 controllano se ci sia la BSM pro- 
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vando a scrivere sul banco 2 e a leg¬ 
gere da quel banco. Se l’operazione 
di scrittura non riesce il computer ha 
meno di 64K. 

Superati tutti e tre i test, ha inizio 
l’installazione. Le linee 97-108 sal¬ 
vano i valori correnti per HIMEM, 
il gestore d’input vero (KSW) e il 
vettore di Reset in locazioni speciali 
di memoria. Questi valori originali 
saranno reintegrati se si fa ricorso al 
comando CTRL-Z (si veda più avan¬ 
ti la sezione riguardante il gestore 
del comando CTRL-Z). 

Le linee 112-123 trasferiscono la 
ROM della motherboard ($D000- 
$FFFF) nel banco 2 della BSM. Le 
linee 127-134 rettificano la routine 
LIST dell’Applesoft (sulla BSM) 
con un vettore a PRTKN, il codice 
di Inverse Keywords che di fatto 
stampa la parola chiave in campo in¬ 
verso. Le linee 138-142 puntano il 
vettore di Reset della pagina 3 al ge¬ 
store di Reset del programma. Le li¬ 
nee 146-148 vi informano della riu¬ 
scita dell'installazione, e il flusso ca¬ 
de nel gestore di Reset, che: 


1. Mette a 1 HIMEM per proteggere 
se stesso e il resto del programma 
funzionale. 

2. Mette a l/azzera il vettore di in¬ 
put del programma. 

3. Ritorna tramite il DOS al Basic. 


Quando l’installazione è completa 
tutto il codice che precede 155 diven¬ 
ta superfluo e può a suo tempo esse¬ 
re sovrascritto. 

• Il gestore d’input. Il gestore 
d'input di Inverse Keyword controlla 
se sia stato introdotto un comando 
valido (linee 193-201) immediata¬ 
mente a destra del prompt dell’Apple¬ 
soft (linee 182-189). Il byte di prom- 
.pt (locazione $33) di un programma 
che sta girando contiene solitamente 
il valore 6, tranne quando si sta ri¬ 
chiedendo l'input, nel qual caso con¬ 
tiene $80. L'esecuzione in modo dif¬ 
ferito viene esclusa, pertanto, esigen¬ 
do il valore ASCII $DD (é) nel byte 
di prompt. Un opportuno comando 
viene inviato al gestore appropriato. 

• Il gestore del comando 
CTRL-K. Il procedimento d’instal¬ 
lazione ha posto la ROM della mo¬ 
therboard sul banco 2 e ha inserito 
un vettore di salto nella routine LI¬ 
ST che permette la stampa in inver¬ 
se della parola chiave selezionata. 



Pertanto il modo evidenziamento è 
generalmente attivato mediante l’abi¬ 
litazione del banco 2 e disattivato 
mediante l'abilitazione della ROM 
della motherboard. Tenete presente 
questo semplice algoritmo nel corso 
della trattazione. 

Quando si preme CTRL-K viene 
attivato il banco 2 (linee 243-244) e 
viene richiesto il nome di una parola 
chiave (linee 248-250). Un rigoroso 
intrappolamento degli errori è stato 
risolto scrivendo una sequenza d'in¬ 
put fatta su misura (linee 254-282) 
anziché usare una subroutine incor¬ 
porata, cioè GETLN ($FD6A) o 
NXTCHAR ($FD75). Se si fa l'in¬ 
put, l’indice del carattere (registro X) 
dev’essere diverso da zero (linee 286- 
287), nel qual caso GDBUFS (linea 
295) converte i caratteri del buffer di 
input (BUF) in ASCII positivo, e se¬ 
gna la fine del buffer attivo con uno 
zero. 

Le linee 299-346 utilizzano una 
variante della subroutine PARSE del- 
l'Applesoft per trasformare in token 
la parola chiave introdotta. Il ritrova¬ 
mento di una parola chiave valida fa 
sì che il token corrispondente venga 
messo nel byte di memoria, TO¬ 
KEN, (linea 434), mentre la scoper¬ 
ta di un token non valido forza uno 
zero in TOKEN e genera un messag¬ 
gio d'errore. Durante il processo di 
tokenizzazione vengono memorizza¬ 
ti nel buffer KEYWORD (linea 436) 
gli equivalenti ASCII inverse dei ca¬ 
ratteri della parola chiave. Perciò 
quando TOKEN contiene un valore 
diverso da zero il gestore di token 
del programma (vedi sotto) utilizza i 
caratteri presenti in KEYWORD per 
stampare in inverse la parola chiave. 
Quando invece TOKEN contiene u- 
no zero, il modo evidenziamento è 
considerato inattivo anche se può dar¬ 
si che sia ancora attivo il banco 2. 

Se non viene fatto alcun input in 
risposta alla richiesta di una parola 
chiave, cioè si preme il tasto 
Return, viene stampata la parola 
chiave inverse se TOKEN è diverso 
da zero; se TOKEN è zero non com¬ 
pare alcun output. 

• Il gestore di token. Le li¬ 
nee 352-368 contengono la rettifica 
della routine LIST sul banco 2. 
Quando LIST incontra un token (un 
carattere ASCII negativo nella me¬ 
moria del programma) il flusso pas¬ 
sa a PRTKN, il gestore di token di 
Inverse Keywords, che confronta il 


ATTENZIONE! 

I listati sono 
pubblicati alle 
pagine 102-106 


token di LIST con quello memorizza¬ 
to in TOKEN. Se risulta che coinci¬ 
dono viene messa sullo schermo (in 
campo inverso) la corrispondente pa¬ 
rola chiave mediante la stampa di 
KEYWORD. Se non coincidono vie¬ 
ne riprodotta la parte di LIST distrut¬ 
ta dal vettore di salto. In entrambi i 
casi il flusso passa poi a un appro¬ 
priato punto di reingresso di LIST. 
Il codice è breve e scorrevole perché 
il lavoro di riempimento di TOKEN 
e KEYWORD con dati significativi 
è già stato svolto dal gestore del co¬ 
mando CTRL-K. 

• Il gestore del comando 
CTRL-J. Le linee 232-239 stampa¬ 
no "OFF”, disattivano l'evidenzia- 
mento attivando la ROM della mo¬ 
therboard e tornano al Basic. Come 
detto sopra questo comando è neces¬ 
sario prima della stampa su carta di 
un listato del codice di un program¬ 
ma in Applesoft. 

• Il gestore del comando 
CTRL-Z. Le linee 207-226 ripri¬ 
stinano i valori originali (preesegui¬ 
ti) di HIMEM, del gestore d’input ve¬ 
ro del vettore di ripristino di pagina 
3. Viene stampato ”ZAP!" e il flus¬ 
so fa una diramazione al gestore di 
CTRL-J, che abilita la motherboard 
e accede al Basic. Questo comando è 
utile soprattutto quando vi stancate 
di Inverse Keywords o avete bisogno 
dei $200 byte in più occupati da In¬ 
verse Keywords. 

• Il resto del codice. Nelle li¬ 
nee 372-380 è contenuta una norma¬ 
le subroutine di stampa. Il testo di 
tutti i messaggi si trova nelle linee 
384-405. Alfinizio il modo eviden¬ 
ziamento è disattivato. Se volete in¬ 
serire un default di $B2 (REM) o un 
altro token badate a riempire KEY¬ 
WORD con il testo ASCII inverse 
della corrispondente parola chiave. 

^ Questo programma è disponibile ^ 

su dischetto. L’elenco, i prezzi 

e le modalità d’ordine di questo 

e degli altri dischetti disponibili 
sono riportati nella rubrica 
i Disk Service. . 
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FLOPPY DISK OLIVETTI. j 

> 

d 


RENDONO PIU’ EFFICIENTE 
OGNI PERSONAL COMPUTER. 
ANCHE QUELLI OLIVETTI. 


Floppy Disk Olivetti: non li producono gli uomini, ma 
computer. Gli uomini si limitano ad osservare, a con¬ 
trollare su video il loro complesso procedimento co¬ 
struttivo: passo dopo passo, prova dopo prova, test 
dopo test, tutto viene osservato dall’intelligenza 
dell’uomo ma eseguito dalla monotona perfezione 
esecutiva del computer che non lascia il minimo 


spazio a quello che un tempo si definiva “errore 
umano”. Tutto ciò in fabbriche interamente dedicate. 
Per questo i floppy disk Olivetti offrono una qualità 
del più alto livello, una perfezione netta certificata al 
cento per cento. Una perfezione che è capace di mi¬ 
gliorare e di rendere più efficiente ogni personal 
computer. Anche quelli Olivetti. 


ACCESSORI ORIGINALI OLIVETTI: LA QUALITÀ COME ABITUDINE. 

olivelli 




Macintosh 


Trucchi^ 


Trucchetti 

Scorciatoie 

Espedienti 

Scappatoie 

Stratagemmi 

Imbrogli 

Trouate 

Rccorgimenti 

Cose strane 


Per fare prima, per fare meglio, per togliersi uno sfizio 
o risolvere grandi problemi... a volte basta un trucco. 

I segreti 
di Macintosh 


Finder 5.3 

• Oggi facciamo un po' di ordine 
sulla scrivania. Quando le vostre ico¬ 
ne sono tutte sparpagliate e usate il 
comando Riordina dal menù Stru¬ 
menti, esse vengono riallineate su u- 
na griglia invisibile e vengono spo¬ 
state nella posizione libera più vici¬ 
na. Perciò rimangono più o meno 
dove erano, sono solamente riallinea¬ 
te (figura le 2). Se invece le vo¬ 
lete tutte ordinate regolarmente tene¬ 
te premuto il tasto Opzione mentre 
selezionate Riordina. Le icone ver¬ 
ranno posizionate regolarmente, sem¬ 
pre su quella griglia invisibile, co¬ 
minciando dall'angolo superiore sini¬ 
stro, da sinistra verso destra e senza 
lasciare spazi vuoti (figura 3). 

• Continuiamo a mettere ordine 
sulla scrivania. Quando ci sono ico¬ 
ne con nomi piuttosto lunghi è nor¬ 
male che vadano a interferire con 
Timmagine delle icone adiacenti ren¬ 
dendo difficoltosa la lettura. Certo, 
potete mettere le icone più spaziate, 
ma, a parte il maggior spazio occu¬ 
pato, quando andate a riordinarle con 


Riordina ritornate alla stessa situa¬ 
zione. Esiste la possibilità di sfalsa¬ 
re l’allineamento delle colonne, per 
cui vengono sfalsati anche i nomi 
che diventano così completamente 
visibili. Il metodo non è complica¬ 
to, ma richiede l'uso di ResEdit e 
questo non è alla portata di tutti. Esi¬ 
ste comunque anche un metodo più 
artigianale che produce quasi gli stes¬ 
si risultati. Cominciate col riordina¬ 
re tutte le icone con la procedura de¬ 
scritta più sopra (tasto Opzione e se¬ 
lezione di Riordina dal menù Stru¬ 
menti). Quando avete tutte le icone 
ben allineate in righe e colonne (fi¬ 
gura 3), con il rettangolo di selezio¬ 
ne selezionate la seconda colonna e 
spostatela verso il basso quanto ba¬ 
sta per rendere ben leggibili i nomi 
delle icone. Fate la stessa operazione 
per la quarta colonna, la sesta e così 
via (figura 4). Se necessario, pote¬ 
te anche avvicinare le colonne fra di 
loro per farne entrare un numero 
maggiore. Questo giochetto può es¬ 
sere utilizzato anche se avete selezio¬ 
nato le icone di formato piccolo e, 
se provate a farlo, vi meraviglierete 


di quante icone riuscirete a fare stare 
sulla scrivania. 

• Per i fanatici dell’ordine, il massi¬ 
mo potrebbe consistere non solo nel¬ 
l’avere le icone ben allineate e leggi¬ 
bili, ma nell’averle anche in ordine 
alfabetico. Se la cosa vi interessa, 
non aspettatevi però di trovare qui la 
procedura, perché è già stata riporta¬ 
ta sul n. 31 di Applicando (novem¬ 
bre 1986) a pag. 118. Non l’avete? 
Nessun problema. Fate ancora in 
tempo a ordinarne una copia al servi¬ 
zio arretrati. 

• Avete parecchie finestre aperte 
contemporaneamente e vi ci vuole 
un’eternità per chiuderle tutte? Tene¬ 
te premuto il tasto Opzione mentre 
fate clic sul quadratino di chiusura 
della finestra attiva o mentre selezio¬ 
nate Chiudi dal menù Archivio. Tut¬ 
te le finestre verranno chiuse senza 
bisogno di altri comandi. 

• Questa scorciatoia è una variante 
interessante di quella precedente. Sta¬ 
te lavorando su un documento (per e- 


I freesoft* 3 \ 


E* 

HEE552! 
Bar 


ffT] 

iil m 


Bin/Gr «pliio; ffl 
CunCodv 


iiT 

MecWrite Rescue^Tr’njJbsarnpler PEgr-l^ Iconf-ld l 

„. , o/ita E3 ri*, 

U X fatdiskmaker f Pep*!C»ps ■*- 

.. I m U lMjj l-fcl 

StringArt; SetSound&StuffClip,maker CM Elenco disohi/Boono d'ordine 


SE 


Figura 1. 


o 





Figura 2. 


35 


































sempio, un documento MacWrite) 
che è annidato in diversi livelli di 
cartelle? Quando date il comando E- 
sci dal menù Archivio, il Finder vi 
riporta al livello superiore con tutte 
le cartelle aperte. Provate invece a te¬ 
nere premuto il tasto Opzione men¬ 
tre selezionate Esci dal menù Archi¬ 
vio: in un attimo vi troverete sulla 
Scrivania con tutte le cartelle chiu¬ 
se. Se siete uno dei fortunati posses¬ 
sori di disco rigido, questa può esse¬ 
re una di quelle cose che riconciliano 
con la vita. 

Uso generale 

• Tutti sapete che nei font del Ma¬ 
cintosh ci sono dei caratteri segreti 
che si ottengono con la combinazio¬ 
ne dei tasti Opzione-Maiuscole-#. 
Ma tutti sapete anche quanto sia dif¬ 
ficile ricordare quali e quanti sono. 
Per vostra comodità riportiamo una 
tabella con questi caratteri relativi ai 
font che si trovano normalmente nel 
file di Sistema (figura 5). Quasi si¬ 
curamente il vostro Sistema contie¬ 
ne dei caratteri differenti; non impie¬ 
gherete più di pochi minuti per farvi 
una tabellina analoga con i caratteri 
segreti che avete a disposizione. 

• Quando in una finestra di dialogo 
è previsto un bottone di default, que¬ 
sto viene rappresentato con una dop¬ 
pia cornice. Non è necessario andare 
con il cursore sul bottone e fare clic: 
una pressione sul tasto Return o sul 
tasto Enter ha lo stesso effetto (se 
chi ha scritto il programma ha rispet¬ 
tato le regole). 

• Nella figura 6 è rappresentato 
un normale menù Dimensioni che 


permette la scelta della dimensione 
per il font selezionato. Quello che 
forse non è a tutti chiaro è il motivo 
per cui alcuni valori sono mostrati 
bordati e altri sono invece in caratte¬ 
ri normali. Le dimensioni rappresen¬ 
tate con cifre bordate indicano quali 
dimensioni esistono realmente nel fi¬ 
le del font interessato (nella figura si 
tratta di 12 el4 punti). Le altre di¬ 
mensioni vengono ottenute variando 
proporzionalmente le dimensioni esi¬ 
stenti. Questo spiega perché quando 
selezionate una dimensione fra quel¬ 
le non bordate potete ottenere sullo 
schermo un risultato accettabile op¬ 
pure un effetto decisamente sgradevo¬ 
le. Anche la stampa con la Image- 
Writer ne viene influenzata mentre 
invece la stampa con la LaserWriter 
non è interessata da questo proble¬ 
ma. Il rimedio? Per la verità un rime¬ 
dio semplice non esiste. L'unico con¬ 
siglio pratico che si può dare è quel¬ 
lo di cercare di usare solamente le di¬ 
mensioni che nel menù vengono mo¬ 
strate con valori bordati. 

Se volete conoscere quali dimen¬ 
sioni esistono per ogni font che pos¬ 
sedete non è necessario che i font 
vengano installati. Sui dischetti del 
FreeSoftware n. 25 e n. 34 potete 
trovare la versione 4.0 di un ottimo 
programma chiamato FontDisplay. 
Con FontDisplay non solo vengono 
elencati, sotto il menù File, le di¬ 
mensioni disponibili nel file del 
font selezionato (figura 7), ma vie¬ 
ne anche indicato il numero di identi¬ 
ficazione del font e la sua localizza¬ 
zione. Inoltre il menù Options offre 
la possibilità di conoscere come ven¬ 
gono rappresentati i caratteri mancan¬ 
ti e quii sono le combinazioni dei 


tasti da usare per ottenere i caratteri 
speciali. Il programma produce una 
griglia nella quale vengono riprodot¬ 
ti tutti i caratteri che fanno parte del 
font; la griglia può essere stampata 
e potete procurarvi in poco tempo 
un utile catalogo della vostra raccol¬ 
ta di font. 

MacWrite 4.5 

• Avete cancellato una parte di te¬ 
sto con il comando di ritorno unita¬ 
rio e vi siete pentiti della cancellazio¬ 
ne? Non tutto è perduto. Tenete pre¬ 
muto il tasto Comando mentre agite 
sul tasto di ritorno unitario ed ecco 
che ricompare il testo che era stato 
cancellato. Purtroppo c’è la limita¬ 
zione che non è possibile ricuperare 
più di 49 caratteri. 

• Quando volete eliminare una pa¬ 
rola da un testo, la procedura norma¬ 
le consiste nel selezionare con il cur¬ 
sore la parola interessata e uno spa¬ 
zio bianco adiacente; poi si batte il 
tasto di ritorno unitario oppure si se¬ 
leziona il comando Taglia dal menù 
Edit (o il suo equivalente Comando- 
X). La selezione di una parola, mol¬ 
to più brevemente, si può ottenere 
posizionando il cursore sulla parola 
e facendo un doppio clic. 

La parola può essere poi cancellata 
con il comando di ritorno unitario 
che cancella, giustamente, la parola 
selezionata; se invece usate il coman¬ 
do Taglia oppure Comando-X non 
solo viene cancellata la parola sele¬ 
zionata ma anche uno degli spazi a- 
diacenti. La sequenza Doppio clic- 
-Taglia si rivela così la procedura 
più rapida per eliminare una parola 
dal testo. 
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• Per selezionare una porzione di 
testo si può posizionare il cursore al¬ 
l'inizio dell'area interessata, premere 
il pulsante del mouse e trascinare fi¬ 
no alla posizione finale oppure si 
può fare clic alfinizio, spostarsi alla 
posizione finale, tenere premuto il 
tasto maiuscole e fare nuovamente 
clic. Il procedimento funziona anche 
al contrario, ossia si può partire dal¬ 
la fine e fare clic-maiuscolo all’ini¬ 
zio. Se mentre fate una di queste ma¬ 
novre tenete premuto il tasto Enter, 
tutto il testo selezionato verrà auto¬ 
maticamente cancellato. Veloce, pra¬ 
tico, ma anche terribilmente perico¬ 
loso! 

MacPaint 1.5 

• Se dovete cancellare larghe aree 
di disegno, invece di usare la gom¬ 
ma potete usare lo strumento rettan¬ 
golo, riempito di colore bianco e sce¬ 
gliendo come linea del bordo la pri¬ 
ma linea della selezione, quella che 
compare punteggiata (figura 8). Ot¬ 
tenete un rettangolo bianco con i 
bordi invisibili il cui uso è molto 
veloce e flessibile, specialmente 
quando l’area da cancellare ha confini 
regolari. 

• Se volete cancellare piccoli parti¬ 
colari del disegno, molto spesso la 
gomma si rivela di dimensioni trop¬ 
po grandi. Se in questi casi scegliete 
un pennello di piccolo formato e se¬ 
lezionate il colore bianco otterrete u- 
no strumento che vi permetterà di 
cancellare selettivamente anche i par¬ 
ticolari più minuti. 

• Se selezionate Scorciatoie nel 
menù Strumenti vi viene presentata 


una riproduzione della tastiera con 
un’indicazione sintetica delle funzio¬ 
ni abbinate ad alcuni tasti. Per esem¬ 
pio, al tasto Maiuscole è abbinata 
l'indicazione di Regolarità per signi¬ 
ficare che la pressione sul tasto 
Maiuscole, mentre si usa uno stru¬ 
mento, produce un effetto con anda¬ 
mento regolare. 

Per rendere più chiaro il concetto 
proviamo a metterla in questo mo¬ 
do: l’uso degli strumenti così come 
sono corrisponde al loro uso a mano 
libera; se invece li usate in combina¬ 
zione con il tasto Maiuscole è come 
se li usaste con riga, squadra o com¬ 
passo. 

Nella figura 9 sono elencati i ri¬ 
sultati che si ottengono con i vari 
strumenti; è interessante, fra l'altro, 
la facilità con cui si possono produr¬ 
re cerchi e quadrati perfetti. Anche 
l'ultima combinazione, quella di 
Maiuscole e pennello può essere 
sfruttata per la preparazione di corni¬ 
ci con i vari motivi dei retini. 

• Nelle Scorciatoie del menù Stru¬ 
menti, al tasto Opzione è attribuita 
la funzione "Linee e Contorni nel 
Motivo Attuale". Questo significa 
che si possono tracciare linee e con¬ 
torni con il retino selezionato invece 
che in nero pieno. Quello che non è 
subito evidente è che questa combi¬ 
nazione rappresenta l’unica maniera 
per ottenere le linee punteggiate o 
tratteggiate. 

Selezionate un retino adatto (figu¬ 
ra 10), lo strumento per tracciare le 
linee e il tasto Opzione. Se tenete 
premuto anche il tasto Maiuscole le 
linee sono obbligate orizzontalmen¬ 
te, verticalmente o a 45°. 


Word 1.05 

Il Microsoft Word non possiede u- 
na funzione Seleziona tutto che per¬ 
metta di selezionare un documento 
intero per fare delle operazioni globa¬ 
li, come, per esempio, la sostituzio¬ 
ne del font. E’ però prevista una scor¬ 
ciatoia molto efficace: spostate il 
cursore sul lato sinistro dello scher¬ 
mo finché si tramuta in una freccia, 
premete il tasto Comando e fate clic 
con il mouse. Ecco fatto! Tutto il 
documento è selezionato. 

ImageWriter 

• Forse avete notato che quando fa¬ 
te una stampa in alta qualità non 
sempre ottenete una qualità molto 
superiore a quella che avete quando 
selezionate qualità standard. Il fatto è 
che il Macintosh cerca un font di di¬ 
mensione doppia di quella che avete 
specificato e poi lo riduce del 50%. 
Per esempio, se avete scritto un te¬ 
sto in Geneva 12, per avere una buo¬ 
na stampa in alta qualità dovete ave¬ 
re nel file Geneva anche la dimensio¬ 
ne 24 punti. In mancanza di Geneva 
24, il Macintosh fa del suo meglio 
ma non aspettatevi il migliore dei ri¬ 
sultati. Anche in questo caso potete 
trovare un aiuto nel grande mare del 
Free Software di Applicando. Sul di¬ 
schetto n.- 11 c’è un programma, 
Font Doubler, che serve proprio per 
raddoppiare le dimensioni di qualun¬ 
que font. L’uso di Font Doubler è 
semplice (figura 11); apritelo, 
scrivete il nome del font interessato, 
scrivete la dimensione di partenza 
(naturalmente questa dovete già aver¬ 
la nel file di Sistema) e fate clic sul 
bottone "Doublé it". Si apre una fi¬ 
nestra che mostra come procede l’o- 
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Applicando ha un nuovo 




Abbonamento tradizionale con dono? 
Abbonamento biennale con supersconto? 

Oppure la nuovissima formula 
rivista con dischetto, per non avere più 
problemi di digitazione? 
Per tutti, comunque, tanti 
programmi, notizie, consigli e... 


'abbonamento annuale con disco 
per Macintosh 
10 numeri di Applicando 
corredato di un dische*^ 
da 3 pollici e 
1/2 su cui sono 

registrati tutti ì programmi per 
Macintosh pubblicati sulla rivista. 

Inoltre sono compresi nel prezzo 
dell'abbonamento l'ultima 
edizione delle Pagine 
del software e 
dell'hardware 
per Apple e un 
portadischetti. 












oresente 




L'abbonamento annuale con disco 
programmi per Apple II 
prevede 10 numeri di Applicando, 
ognuno corredato con un dischetto 
da 5 pollici e 1/4 su cui sono 
registrati tutti i programmi per Apple II 
pubblicati sulla rivista. 

Inoltre sono compresi nel prezzo 
dell'abbonamento l'ultima edizione 
delle Pagine del software e dell'hardware 

per Apple e un 
portadischetti. 


diskf 


Compilare e spedire il tagliando sottostante a 
Editronica srl, Corso Monforte 39,20122 Milano. 


Sì! Desidero sottoscrivere il seguente abbonamento: 


□ Abbonamento annuale con dono, che dà diritto a ricevere 10 numeri di 
Applicando e in omaggio l'ultima edizione delle Pagine del software e dell'hardware 
per Apple, il catalogo ragionato di tutti i programmi e dei maggiori prodotti hardware 
esistenti in commercio per Apple II e Macintosh, al prezzo di lire 60.000. 

□ Abbonamento annuale senza dono, che dà diritto a ricevere 10 numeri di 
Applicando , al prezzo di lire 50.000, con uno sconto di 10.000 lire sul prezzo di 
copertina. 

□ Abbonamento biennale con dono, che dà diritto a ricevere 20 numeri di 
Applicando e in omaggio l'ultima edizione delle Pagine del software e dell'hardware 
per Apple, il catalogo ragionato di tutti i programmi e dei maggiori prodotti hardware 
per Apple II e Macintosh, al prezzo di 100.000 lire. Inoltre lei risparmia ben 
20.000 lire sul prezzo di copertina. 

□ ^Abbonamento biennale senza dono, che dà diritto a ricevere 20 numeri 
di Applicando, al prezzo di lire 80.000, con uno sconto di 40.000 lire sul prezzo 
di copertina. 

□ Abbonamento annuale con disco programmi per Apple II, che dà 

diritto a ricevere 10 numeri di Applicando, 10 dischetti da 5 pollici.e 1/4 e le Pagine 
del software e dell'hardware per Apple, al prezzo di 260.000 lire. Infatti ogni numero 
le verrà recapitato direttamente a domicilio insieme con il dischetto con già 
registrati tutti i programmi per Apple II pubblicati quel mese. Inoltre, 
in dono, le verrà subito recapitato un elegante portadischetti. 

□ Abbonamento annuale con disco programmi per Macintosh, che dà 

diritto a ricevere 10 numeri di Applicando, 10 dischetti da 3 pollici e 1/2 e le Pagine 
del software e dell'hardware per Applee, al prezzo di 300.000 lire. Il dischetto che 
ogni mese le arriverà a domicilio conterrà tutti i programmi per Macintosh. 
Anche in questo caso le verrà inviato subito, in dono, un elegante portadischetti. 


□ Inviatemi i seguenti arretrati a 7.000 lire ciascuno (per l'elenco degli arretrati 
vedere alla pagina seguente. I nn.1 e 2 sono esauriti): NN. 


□ Allego assegno non trasferibile si L_ intestato a Editronica srl, 

Corso Monforte 39, 20122 Milano. 


□ Allego ricevuta di versamento di L_ sul C/C postale n. 19740208 

intestato a Editronica srl, Corso Monforte 39, 20122 Milano. 


Còme realizzare libri, giornali, 
nouse-organ, opuscoli, 
cataloghi e news-letter con 
11 Macintosh e l’Apple II 



□ Pago fin d'ora I-con la mia carta di credito BankAmericard 

N—----scadenza_autorizzando la Banca d'America e 

d'Italia ad addebitare l'importo sul mio conto BankAmericard. 

Cognome_Nome_ 

Indirizzo_ 

Cap___Città_Provincia_ 


J 


Data 


Firma 



















Numeri arretrati di 

Applicando 


...ma anche un 


3 - settembre/ottobre 1983 - Lire 7.000 • Un programma di Data Base accessi¬ 
bile a tutti ♦ Ecco Logo in italiano • Una scheda e una telecamera e il tuo Apple ve¬ 
de • Etichette spiritose o bizzarre • Piccoli editori, club e associazioni possono 
raggiungere soci e abbonati facilmente • Equo canone con VisiCalc per padroni e 
inquilini • Una routine e la Epson M 80 stampa i grafici • Seconda puntata del cor¬ 
so di Basic • Con un uso accorto del WPL ecco pronto un documento di più pagine, 
personalizzato, con decine di opzioni • Dadi e punti (gioco). 

4 - novembre/dicembre 1983 - Lire 7.000 • Tre schede, una tastiera e un po' di 
software: il computer diventa un'intera orchestra • Pianoforte, organo e violino in 
Pascal • Per imparare a leggere più velocemente (e fare esercizio di inglese) • E- 
ìogio del VisiDex • Grazie Lisa: cos'è e a chi può servire il rivoluzionario personal 
Apple • Rompiquindici: quindici pedine bianche da mettere nel giusto ordine • Per 
chi ha dischetti del Sistema Pascal, ecco una rassegna delle possibilità offerte e 
dei comandi a disposizione • Il programma Dedalus • Terza puntata del corso Ba¬ 
sic * Guida ragionata dei software in commercio per la gestione condominiale • U- 
na numeric keypad fatta solo di software. 

5 - gennaio/febbraio 1984 - Lire 7.000 • La tecnologia del mouse applicata al¬ 
l’Apple Il • In memoria i vostri impegni di un anno intero • Un programma per la con¬ 
tabilità semplificata • Un gioco per due, nel quale si danno battaglia cannoni di 
grosso calibro • Investor in portafoglio: uno dei migliori programmi che fornisce 
in tempo reale il quadro esatto di come vanno i propri investimenti finanziari; idea¬ 
le per la gestione del proprio portafoglio titoli • Quarta puntata del corso di Ba¬ 
sic * Il famoso gioco delle freccette in versione elettronica per Apple • Prima pun¬ 
tata di un facile corso di Pascal • Macintosh: piccolo, maneggevole, portatile. 

6 - marzo/aprile 1984 - Lire 7.000 • AppleWorks (Tre per te): un unico softwa¬ 
re per database, word processor e spreadsheet • Anteprima di Apple Ile: com¬ 
pleto e compatibile, ma anche portatile, leggero, versatile • Titoli di stato, cartel¬ 
le fondiarie, obbligazioni: l'Apple per difendere i risparmi • Un mostro tira l'al¬ 
tro: riuscirete a mangiarli? • Stress: un nuovo gioco per vincere lo stress • Memo¬ 
ria riga per riga: come localizzare parti di un programma velocemente con 
LineFinder • Seconda puntata del Pascal: cos'è un compilatore? • L'Applesoft 
per semplificare l'impaccamento dei record e il recupero delle informazioni • Gra¬ 
fici : il dump della pagina grafica da Apple Ila una stampante semigrafica. 

7 - maggio/giugno 1984 - Lire 7.000 • ProDOS: il nuovo sistema operativo con la 
possibilità di usare il ProFile e il Mouse • Computer e pennello: Apple e i suoi capo¬ 
lavori* Topolino aiuta i bambini a riconoscere i numeri • Programmi top secret: im¬ 
pedite ai curiosi di ficcare il naso nei vostri programmi • Una cassetta di salvatag¬ 
gio per registrare i programmi più importanti • Grafica e animazione: sesta pun¬ 
tata dell'Applesoft • Diventa un disk jockey infallibile: l'Apple tiene in ordine l'ar¬ 
chivio dei tuoi dischi • Aiuto: un programma che vi consente di trovare subito gli 
errori di battitura e di correggerli tutti insieme. 

8 - luglio/agosto/settembre 1 984 - Lire 7.000 • Personalizza i messaggi di er¬ 
rore dei tuoi programmi • Appliscuola: una nuova serie di articoli e programmi stu¬ 
diati per la scuoia • Le Mans in poltrona: la corsa automobilistica più famosa del 
mondo • Due dita sono sufficienti per scrivere, ma con dieci... • Un computer per 
segretario * Trasformate il vostro Apple in un melodioso organo • La struttura 
dei dati: quarta puntata del corso di Pascal • La scelta della stampante è impor¬ 
tante: se l'accoppiata con il computer è vincente... • Scritte lampeggianti e carat¬ 
teri che scorrono con ('Applesoft • Macintosh: 37 nuovi programmi: tutte le novità 
del NCC di Las Vegas. 

9 - ottobre 1984 - Lire 7.000 • Cinque modem per collegarsi con reti e banche 
dati • Ile contro Ile: fino a che punto sono compatibili? • Fuoco fatuo: un adventu- 
re game che mette alla prova anche i più esperti • Rotazione e traslazione delle fi¬ 
gure piane e somma delle forze parallele: seconda puntata di Apppliscuola • Ge¬ 
rarchia, sequenza e ombra per visualizzare il parentado: quinto appuntamento con 
il Pascal • Come ottenere grandi risultati nella grafica ad alta risoluzione utiliz¬ 
zando un Apple II e un TV color • Una semplice routine per disporre sempre della 
data memorizzata • Macintosh: Guida all'Ms-Basic. 

10 - novembre 1984 - Lire 7.000 • Una guida per entrare con l'Apple nelle reti 
nazionale e internazionale • L'Apple //c stila una graduatoria delle autovetture 
d'epoca • Come gestire tre attività professionali diverse con un Apple • Niente 
paura se inavvertitamente battete New o Fp! • Dos: un programma per ritrovare 
sempre i dati che sembrano scomparsi • L'ottava puntata di Applesoft: come man¬ 
tenere allineate le righe • Differenze tra Integer e Applesoft e lanauage card • 
Pascal • Appliscuola: rette nel piano cartesiano, equazioni e calcolo del coefficien¬ 
te di correlazione • Macintosh: Computerizzate il libro cassa con il Mac. 

11 - dicembre 1984 - Lire 7.000 * Una banca dati per avere sotto controllo un ar¬ 
ticolo, il suo numero di pagina, la rivista su cui è stato pubblicato • Per recupera¬ 
re un file cancellato accidentalmente • Tutti i trucchi per personalizzare l'Hello o 
per proteggere i listati da occhi indiscreti • L’Apple sulla scrivania: perché non 
lasciarvi un messaggio personalizzato? • Un tastierino numerico pronto a entrare 
in azione * Nella versione 1.7 del tal programma avete introdotto una variante, ma 


dove? Per saperlo subito e senza errori... • Tre animali feroci vi inseguono: riusci¬ 
rete a metterli in trappola? • Ultima puntata del corso di Pascal • Speciale Appli¬ 
scuola • Macintosh: Novità software e hardware. 

12-13 - gennaio/febbraio 1985 - Lire 7.000 • Per imparare a giocare a Bridge 
con l'Apple o perfezionarsi nella dichiarazione; il computer tiene il punteggio e fa 
da avversario • MicroCalc, un programma per capire VisiCalc e i pacchetti simili, 
che mette a disposizione un totale di 400 caselle • Un corso chiaro, semplice ed e- 
sauriente per imparare a usare AppleWorks e VisiCalc: in ogni articolo un modello 
pronto da usare, il primo è un budget professionale • Una potente utility che per¬ 
mette l'editing dei programmi • Aggiungere a un programma esistente delle i- 
struzioni DATA • Speciale Appliscuola: animazione di una rotazione. 

14 - marzo 1985 - Lire 7.000 • Un computer per meccanico, che ricorda tutte le 
operazioni di manutenzione • Per trasformare una parola o un disegno in un po¬ 
ster gigante • Un programma per ricreare sull'Apple qualunque percorso di Golf 
• Mentre imparate AppleWorks e VisiCalc potete costruire un utilissimo modello 
per compilare la nota spese in tre minuti • Un programma per imparare a contare 
in età prescolastica, un altro per ripassare le tabelline, un terzo per migliorare 
l'ortografia • Speciale Appliscuola: stima dei frutteti con l'estimo • Macintosh: Co¬ 
mando per comando, potete disegnare con uno dei maggiori e più creativi esperti 
del mondo • Grafici con Mac Chart • Hit parade del mese. 

15 - aprile 1985 - Lire 7.000 • Ricette perfette con l'aiuto del vostro Apple • 
Per scegliere se la vostra prossima automobile sarà diesel o a benzina • Un reper¬ 
torio di suoni e rumori di ogni genere per colonna sonora ai vostri programmi • Gio¬ 
care a volano con l'Apple • Un programma per sfruttare le qualità grafiche del¬ 
l'Apple • Un menu professionale per i vostri programmi: evidenziate con una bar¬ 
ra luminosa il programma da far girare • Continua il corso AppleWorks: il data ba¬ 
se • Appliscuola: un diagramma cartesiano per il calcolo del massimo comun diviso¬ 
re, e un programma di chimica • Macintosh: Fumetti con Mac • Magic e File Vision • 

16 - maggio 1985 - Lire 7.000 • Un sistema di data base nutrizionale per perso¬ 
nalizzare una dieta bilanciata, a lunga o a breve scadenza • Ancora un data base 
nel corso AppleWorks: come farsi un’agenda telefonica • Pompieri: un gioco d'azio¬ 
ne e abilità • Un programma capace di trasformare l'Apple II in un fedele e preci¬ 
so timer • Una tavola di disegno per emulare i più potenti programmi di 
CAD/CAM • Come scrivere un programma compiuto su una linea sola. Ecco i primi 
venti one—liner • Una utility che facilita il lavoro di correzione di un listato, ren¬ 
dendone più^comoda la lettura • Macintosh: Jazz • Hit parade del mese. 

17- giugno 1985 - Lire 7.000 • Le principali nozioni, un dizionario nautico e due si¬ 
mulatori di regate per entrare nel mondo della vela • Un programma che trasfor¬ 
ma l'Apple in una sofisticata calcolatrice RPN • Una piantina per pianificare qua¬ 
lunque itinerario stradale americano tra ben 171 città diverse • Un uragano si sca¬ 
tena sulla città: riuscirete a trovare rifugio? • Un'applicazione AppleWorks per 
la gestione di un negozio • Un programma per eseguire analisi statistiche con pre¬ 
visioni • Sparate a vista, senza essere colpiti • Continuano gli One-liner, i pro¬ 
grammi su una linea sola • Macintosh: Smooth Talker • Hit parade del mese. 

18 - luglio/agosto 1985 - Lire 7.000 • La versione per Apple di Trivia, il gioco 
che ha stregato mezzo mondo • Continua il corso AppleWorks con le funzioni del 
word processor • Una utility per personalizzare il bip segnala errori • Un pro¬ 
gramma per seguire l'andamento dei propri bioritmi mese per mese • Per sapere 
i consumi dell'auto senza affogare in calcoli e foglietti • Come esaminare l'anda¬ 
mento di un grafico di una funzione • Poche linee di programma per avere scritte 
perfettamente centrate su video e stampante • ProDOS: una lezione sotto forma 
di utility per imparare a programmare • Continua la serie degli one-liner • Macinto¬ 
sh: My Office • MacHardware: ThunderScan. 

19 - settembre 1985 - Lire 7.000 * Oracolo: per non sbagliare quando sono in 
ballo decisioni importanti • Digger e Claustrophobia, due giochi • Tutti i segreti 
per un collegamento in rete per 5-25 utenti • Tutti i conti dello studio legale: un 
programma per avvocati scritto da avvocati • Per caricare in memoria un pro¬ 
gramma in Applesoft al di sopra di un codice macchina • Apple Ile più mouse: ac¬ 
coppiata vincente per i movimenti cassa-magazzino * Altri cinque one-liner • Ini¬ 
zia una splendida serie di articoli sull’uso della grafica ad altissima risoluzione • Ma¬ 
cintosh: MicrosoftWord è un programma che vale davvero la pena di avere • Ag¬ 
giornatissimo catalogo di programmi e accessori. 

20 - ottobre 1985 - Lire 7.000 • Salute: come ricordare tutte le malattie e regi¬ 
strare le spese mediche • Come far parlare l'Apple II • Oroscopo personalizzato 
con grafici della carta del cielo natale • Stabilizzatori di corrente per non perde¬ 
re ore di prezioso lavoro • Dieci one-liner • Basic Writer consente il collegamento 
diretto tra l'ambiente di elaborazione testo e l'ambiente Basic • Come controllare 
il valore di una variabile per individuare ali errori • Ecco la seconda puntata sull'u¬ 
so della grafica ad altissima risoluzione • Speciale Appliscuola: simulazione di un e- 
quilibrio • Macintosh: nutrita hit parade del mese. 

21 - novembre 1985 - Lire 7.000 • Arredamento: con AppliArchitet • Grand 
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Prix: una corsa d'auto stile arcade in Applesoft • Un modo per accedere diretta- 
mente alla routine di stampa by passando tutto il programma • Controllo diretto 
del cursore • Altri dieci one-liner • Per Apple II un nuovo, potente foglio elettroni¬ 
co integrato con grafici e data management • Prima puntata di un corso di pro¬ 
grammazione avanzata in Basic • Terzo articolo sulla doppia Hi-Res: le figure a 
blocchi • Macintosh: hard disk a confronto • Contabilita generale o forfettaria: 
tre pacchetti a confronto • Hit parade del mese. 

22 - dicembre 1 985/gennaio 1 986 - Lire 7.000 * Speciale: una rassegna comple¬ 
ta dei tip di stampante, con le caratteristiche tecniche e le prestazioni, e dei rela¬ 
tivi accessori e una tabella comparativa di trenta macchine provate direttamente 
• Memodesk: non la solita agenda elettronica ma un calendario intelligente da scri¬ 
vania • Simulazione in Hi-Res di una slot machine di BlackJack, come quelle di Las 
Vegas • Due programmi per gli studi dentistici • Continua il corso di programma¬ 
zione avanzata in Basic • Effetti speciali con Spinner • Dieci one-liner • Calenda¬ 
rio perpetuo dal 1753 in poi per Apple e Mac • Quarta puntata di grafica: anima¬ 
zione • Speciale Appliscuola: il numero di Avogadro • Macintosh: stampare un cata¬ 
logo professionale di alta qualità a costi contenuti • Hit parade. 

23 - febbraio 1986 - Lire 7.000 • Speciale editoria: Macintosh, Apple II, Laser¬ 
Writer e tutto il software necessario per creare un centro stampa autonomo • Co¬ 
me programmare il mouse dell'Apple II • Guerre stellari • Harmony: database, te- 
xt editor, generatore di istogrammi • Come far scorrere 18 immagini sul video, 
per un effetto sorprendente • Grafica: scorrimento orizzontale di una stringa sul 
video • Corso avanzato di Basic (3) • Sette one-liner • Scuola: resoconto su Pisa 
: Funzioni e grafici tridimensionali • La tavola degli elementi chimici • Macintosh: la 
compatibilità Mac-IBM • Tutto sul CFS • L'hit-parade del mese. 

24 - marzo 1986 - Lire 7.000 • Speciale architetti e ingegneri: tanto software 
per risolvere al computer i problemi di computo e disegno • Executive Cardfile è 
un archivio intelligente, organizzato in più schedari, flessibili e potenti • Screen 
dump a 80 colonne in ogni momento della programmazione • Apple Maestro inse¬ 
gna a comporre musica anche agli stonati, e senza fatica • A che ora nascono i vo¬ 
stri file? Senza acquistare schede software, chiedetelo al programma Ora e da¬ 
ta • Archiviare con il mouse, sull'Apple II: pon Ped-one • Grafica: lo scorrimento 
verticale • Pronto PC? Un’agenda elettronica che compone anche il numero • Ap¬ 
pliscuola: disegni prospettici con rimozione delle parti nascoste e un trivia, per 
tutte le materie, da impostarsi a piacere • Macintosh: una guida all’acquisto del da¬ 
tabase giusto • Macnews • Linguaggi per la programmazione: come scegliere quel¬ 
lo adatto alle proprie esigenze • Grafici: un programma che sa crearli tutti e, so¬ 
prattutto, permette di esportarli. 

25 ■ aprile 1986 ■ Lire 7.000 • Speciale comunicazioni: modem e banche dati, per 
attingere dati da ogni parte del mndo • Chart Manager per la gestione dei dati e 
la restituzione grafica in curve, barre e torte • Apple Checker, per chi ricopia i li¬ 
stati: controlla gli errori • Grafica: dentro la logica di programmazione in doppia 
alta risoluzione • Buffer di stampa: ricaviamolo proprio dall'Apple, che contiene u- 
na scehda memoria sempre inutilizzata • Oneliners • Appliscuola • Variazioni di ve¬ 
locità in funzione di concentrazione dei reagenti e temperatura • Macintosh: prova 
su strada del Bernoulli Box, che archivia su cartuccia • Macnews • Una database 
veloce, versatile e, per di più, personalizzato da una potente struttura a schede. 

26 - maggio 1986 ■ Lire 7.000 Speciale: gli spreadsheet più potenti per ApDle II 
e Mac • Giochi: arriva finalmente l'adventure tutto italiano, bello e difficile • Grafi¬ 
ca: altri segreti sull'animazione in DHR • Appliscuola: un programma che risolve in 
un baleno sistemi di equazioni lineari • Ants! Il terrore, con le sembianze di 
gigantesche formiche, viene dal giardino • Oneliners • Quale sarà il futuro di Ap¬ 
piè II? Un'intervista con John Sculley e molte novità da Cupertino • Macintosh: met¬ 
tere in rete Sunol, il disk server piccolo e potente • Mac+//: un programma che si¬ 
mula su Mac il video Applesoft? Certo, per utilizzare ancora la vecchia biblioteca 
programmi del II • Windowd Toolbox, perché ogni programmatore vorrebbe po¬ 
ter modificare le finestre del toolbox • Bioritmi: simpatico e dotato di buona gra¬ 
fica, questo programma traccia le curve, le compara, dà il consiglio del giorno • 
Mac news. 

27 ■ giugno 1986 • Lire 7.000 Chitarra: imparare gli accordi con un maestro ec¬ 
cellente e davvero chiaro • Dischetti: archiviando con Unidisk e i dischi da 3,5 polli¬ 
ci si risolvono molti problemi • Reminder: un programma per non dimenticare nulla 
e pianificare tempo libero e vita in famiglia • Assicurazioni: una polizza casco per 
il computer • Grafica: più nessun problema nella gestione delle coordinate, se si la¬ 
vora con le figure a blocco • Postmaster: etichette insuperabili • Mitogame: gio¬ 
cando con Zeus succede che... • Appliscuola: trigonometria • Macintosh: lo chiama¬ 
no software jpovero, ma spesso si rivela più potente dei cugini più costosi. E, in 
particolare, ómnis 3 fa miracoli • Mac Banker: gestisce il conto corrente e stam¬ 
pa gli assegni • Leasing: i costi veri, la vera convenienza • Mac Plus: occhio agli in¬ 
compatibili! • Programmi: è possibile trasferire listati, da Applesoft a MS Basic. 
Molti programmi del II possono girare su Mac. 

28 • luglio /ago$to1986 - Lire 7.000 Per Apple II e per Macintosh, una rassegna 


del miglior software musicale • Millenote: una routine per comporre, e poi esporta¬ 
re, brani anche complessi • Planetario: la volta celeste del luogo che vuoi, dell'ora 
che vuoi... • Scatola nera: un classico tra i giochi di deduzione • Supershopper: co¬ 
metaria spesaal meglio, senzasprechi né dimenticanze‘Grafica: animazionevelo¬ 
ce senza scambio di pagina • Macintosh Gin: un gioco con le carte bellissimo, di cui 
però è arduo calcolare il punteggio. Con questo programma non è più un proble¬ 
ma • Reset: un aiuto per chi programma in MS Basic • Cronometro: al sessantesi¬ 
mo di secondo, con la stampa dei parziali • Radion Tyrant: il gioco nella reggia del 
tiranno • Text file: un'utility per correggere più in fretta i listati. ♦ Macnews. 

29 ■ settembre 1986 - Lire 7.000 Cartoni animati: tutti Walt Disney con Movie 
construction set • Stampanti: arrivano tredici nuove stampanti per Apple II tar¬ 
gate Ivrea • SMAU 86: novità • Utility in accoppiata vincente per chi programma 
in Applesoft: un programma comprime le immagini Hi-Res e uno potenzia le gestio¬ 
ne deiri/O • Finestre e icone: come sul Mac, anche sul II lagestione diventa amiche¬ 
vole • Grafica: animazione e spostamento insieme! • Macintosh Borsa: Investor è 
tra i migliori programmi di gestione titoli, ma costa infinitamente meno... • Melina: 
i nuovi accessori da scrivania • FreeSoftware: ora anche in Italia, grazie ad Appli¬ 
cando, il software gratis • I Ching: il più antico metodo di divinazione in una raffi¬ 
nata versione • Macnews. 

30 - ottobre 1986 ■ L. 7.000 • Tutto sul nuovo Apple II GS amichevole come il 
Mac e potentissimo • Servotelefono: la rubrica elettronica. • Un’utility che esten¬ 
de il potenziale dell'Applesoft in Dos 3.3, basata sul comando Ampersand (&) • 
Gioco: riuscirà Sammy il Pinguino a salvare la sua isola di ghiaccio dagli invasori? • 
Grafica: scrivere sullo schermo dell'Hi-Res • Con Turile Basic bastano 24 parole 
per programmare la grafica e stampare testi in alta risoluzione • Un eccellente 
correttore ortografico per i testi scritti in italiano o in Pascal. • Macintosh: Let¬ 
tura veloce in italiano e in inglese • I nuovi monitor 15" a colori • SuperSorter è un 
programma di ordinamento dati al vostro servizio. 

31 ■ novembre 1986 • L. 7.000 • Il Computest per controllare la vostra forma fisi¬ 
ca in vista delle vacanze sugli sci • Una libreria per conservare le subroutine di uti¬ 
lizzo frequente • Tutte le schede di espansione di memoria per Apple II • L’Apple 
suona 'Happy Birthday' • Un programma per realizzare listati formattati e dia¬ 
grammi di flusso: potrete correggere un listato anche dopo molto tempo • Far 
scorrere il testo sullo schermo dell'Hi-Res • Vi presentiamo tutti i caschi silenzia¬ 
tori per stampanti disponibili sul mercato • ProWriter: dà più potenza al word 
processing • Macintosh: Abbiamo provato per voi lo Scanner S200 dell'Agfa Ge- 
vaeri che trasforma testi e disegni in file • Zoom: un database grafico per dise¬ 
gni e testi • Hard disk: 640 Meaa in cascata • Disk editor per recuperare i file 
perduti • Riclassificazione di un bilancio sfruttando la potenza di Excel. 

32 ■ dicembre86/gennaio 87 - L. 7.000 - Un ponte tra DOS e ProDOS: i due 
sistemi operativi sono disponibili a piacere su un solo dischetto • Compass Quiz: 
Aiuta i ragazzi a imparare i punti cardinali usando la grafica in alta risoluzione • 
Plotter automatico: consente la stampa in alta risoluzione di diagrammi di 
funzione con messa in scala automatica. • Ram Disk 64: un risparmio di tempo dal 
60 al 90% grazie a questa routine di emulazione • Macintosh: tutti in rete con 
AppleTalk • dBase: anche per Mac il potente database relazionale programmabile 

• Abbiamo provato per voi il nuovo hard disk Hyperdrive FX 20, veloce e 
affidabile • Mac Music: un programma per suonare sfruttando le quattro voci del 
sintetizzatore interno del Mac. 

33 ■ febbraio 1987 - L. 7.000 • Due software per IIGS: GSPaint e GSWrite • Ge¬ 
stione del conto corrente con AppleBanker • Quattro programmi didattici in Ap¬ 
plesoft per giocare con i vostri figli • List Master: un’utility che consente un’espo¬ 
sizione più organizzata del listato, favorendo la ricerca degli errori • Siete stan¬ 
chi del solito bip? Ecco Duetto, per inserire nei vostri programmi il suono a due 
voci • Comincia in questo numero una serie di articoli sull'intelligenza artificiale • 
E' arrivato il FreeSoftware per Apple II • Macintosh: • novità per la rete Apple¬ 
Talk • Tutte le novità presentate al MacWorld Expo di San Francisco • Giocare a 
briscola scoperta contro il Mac. 

34 ■ marzo 1987 ■ L. 7.000 • Tutti i programmi compatibili con Apple IIGS • Ge¬ 
neratore di suoni per i vostri arcade con Arcade sound editor • Tre super utility: 
una biblioteca di routine, un comando di Copy e una protezione per il dischetto • 
Un programma per creare effetti-dissolvenza sullo schermo Hi-Res • Seconda 
puntata sull’intelligenza artificiale • Applicazione AppleWorks per la gestione 
completa del conto corrente bancario • Un gioco che è anche un propramma didat¬ 
tico, in quanto studia le possibili traiettorie di un pallone da football in un giorno 
di vento • Macintosh: due nuove macchine e una serie di periferiche dalle prestazio¬ 
ni stupefacenti accrescono la famiglia dei Mac • MacTime: imparare a gestire me¬ 
glio il proprio tempo con un programma appositamente sviluppato sulla traccia 
del sistema Time Manager • Compilatore per il Basic Microsoft • Shopper Mac, 
per la gestione della dispensa domestica ; MacBanner, crea manifesti e striscioni 

• Orto: un'applicazione del programma Filevision per la gestione di un orto o un 
giardino. 
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Tasto maiuscole + 


Matita 

Linee perfettamente orizzontali o verticali 

Gomma 

Cancella con movimenti orizzontali o verticali 

Meno di spostamento 

Sposta con movimenti orizzontali o verticali 

Lasso/Selezione 

Sposta con movimenti orizzontali o verticali 

Linee 

Traccia linee orizzontali, verticali o a 45* 

Rettangoli 

Produce dei quadrati perfetti 

Cerchi 

Produce dei cerchi perfetti 

Spray 

Disegna con movimenti orizzontali o verticali 

Pennello 

Disegna con movimenti orizzontali o verticali 
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Figura 11. 


perazione e poco dopo vi trovate con 
il font di dimensione doppia già in¬ 
stallato. Si potrebbe rifinirlo un po¬ 
co con uno dei diversi Font Editor 
in circolazione, ma questo è un altro 
discorso. 

• La situazione è classica: è dome¬ 
nica, state completando la relazione 
da consegnare lunedì mattina e sco¬ 
prite che il nastro della ImageWriter 
è talmente esaurito che la stampa 
non sarebbe leggibile neanche con il 


sistema Braille. Potete salvarvi la 
giornata se prendete due fogli di car¬ 
ta, interponete un foglio di carta car¬ 
bone, regolate adeguatamente la leva 
per lo spessore della carta e infilate 
il tutto nella stampante, così come 
si fa con una macchina per scrivere 
(se vi ricordate ancora come si usa u- 
na macchina per scrivere!). La copia 
che si ottiene sul secondo foglio è 
praticamente perfetta. Questo siste¬ 
ma è una procedura di emergenza e 
non deve essere inteso come alterna¬ 


tiva all'acquisto di un nastro nuovo. 
Comunque potrebbe essere sfruttato 
per una variante interessante: se vi 
procurate della carta carbone di colo¬ 
re differente dal nero potete produrre 
delle stampe colorate di rosso, blu, 
violetto, ecc. come se aveste usato 
un nastro colorato (uno di quei na¬ 
stri di colore diverso dal nero che, 
chissà perché, non è reperibile in Ita¬ 
lia). 

Livio Fiorenti 

(continua) 
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Approda sul Macintosh il compilatore Pascal 
della Borland, campione di vendita 
nel mondo dell'MS-Dos. 

Ha le carte in regola per soddisfare 
chi lavora con questo linguaggio sul Mac? 

Turbo per Mac 


Perché programmare in Pascal? 
Semplice, perché è il linguaggio i- 
deale per imparare a programmare 
con stile e correttezza, perché è un 
linguaggio altamente strutturato e 
più potente del Basic, ma di appren¬ 
dimento più semplice rispetto al C 
o al Forth. Perché in Pascal sul Ma¬ 


cintosh? Perché il ToolBox, il miti¬ 
co sistema operativo che consente di 
fare miracoli grafici, tra bottoni, me¬ 
nù e finestre, è stato concepito pro¬ 
prio in Pascal, e ne conserva perfetta¬ 
mente lo spirito. 

La Borland ci propone la versione 
Macintosh del suo compilatore Tur¬ 


bo Pascal, un programma giunto al¬ 
la terza collaudata versione in am¬ 
biente MS-Dos, forte di migliaia di 
installazioni, utilizzato professional¬ 
mente da diverse software house d’ol- 
treoceano. 

La confezione del compilatore con¬ 
tiene due dischetti da 400 Kb e un 
manuale di 462 pagine, in america¬ 
no. Il primo disco contiene il siste¬ 
ma, il finder e il compilatore, il se¬ 
condo i programmi dimostrativi e al¬ 
cune utility che vedremo più avanti. 

Il compilatore ha un’icona che raf¬ 
figura la classica bandiera a scacchi 
bianchi e neri delle gare automobili¬ 
stiche, in linea con il nome Turbo 
che lascia presupporre prestazioni 
particolarmente veloci. 

Al nastro di partenza 

Un doppio clic rivela una finestra 
di edit simile a quella del program¬ 
ma Editor di casa Apple, in più com¬ 
paiono nel menù le voci per la com¬ 
pilazione e per il trasferimento dei fi¬ 
le ad altri programmi. 

La filosofia del Turbo Pascal MS- 
Dos è stata rispettata in pieno, come 
si nota lanciando uno degli esempi 
forniti sótto forma di sorgente. La 
compilazione avviene direttamente 
in memoria, senza bisogno di acces¬ 
si al disco, anche per programmi di 
una certa consistenza. La velocità è 
impressionante, il manuale parla di 
12.000 linee compilate al minuto. 
Se in compilazione viene individua¬ 
to un errore compare un box (con il 
disegno di un bug, un piccolo inset¬ 
to), e la descrizione deH’errore. Im¬ 
mediatamente ci si ritrova in modo e- 
ditor, con la linea incriminata già se¬ 
lezionata, pronta per la correzione. 
Questo lascia intuire come l'ambien¬ 
te Turbo Pascal sia indicato per i 
principianti, quelli che commettono 
più errori, magari anche banali: cor¬ 
reggerli è un attimo. 
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Figurai. Lo schermo di edit del Turbo, 

con il box di informazioni sullo stato della memoria 

ottenibili con Get Info dal menu Compile. 



Figura 2. Con questo box si definiscono 
i percorsi di ricerca, nelle varie cartellette. 

Il Turbo Pascal è pienamente HFS compatibile. 


Il Turbo esegue i suoi compiti in 
un solo passo: non ci sono un com¬ 
pilatore e un linker, ma solo una fa¬ 
se che svolge entrambi i compiti. 
Selezionando nel menù Compiler la 
voce appropriata si può eseguire un 
programma immediatamente dopo la 
compilazione, oppure compilare su 
disco anziché in memoria (ottenendo 
così una classica applicazione Macin¬ 
tosh, eseguibile con due clic) o, an¬ 
cora, di fare soltanto un controllo 
della sintassi. 

La voce Option, nel medesimo me¬ 
nù, consente di indicare i percorsi di 
ricerca dei vari moduli di un pro¬ 
gramma (nelle varie cartellette) an¬ 
che se sono disperse su più dischet¬ 
ti, e la voce Get Info (figurai) mo¬ 
stra alcune informazioni accessorie 
sullo stato della memoria. 

L'editor consente di lavorare con 
otto diverse finestre, quindi di tenere 
diverse versioni dello stesso pro¬ 
gramma per valutare eventuali modi¬ 
fiche (memoria permettendo). Oltre 


alle classiche funzioni di ricerca e so¬ 
stituzione è contemplata la possibili¬ 
tà di raggiungere immediatamente l'i¬ 
nizio del file o la posizione in cui si 
trova il cursore anche quando non vi¬ 
sualizzato. 

Quale standard per il Turbo? 

Per chi già ha mosso i primi passi 
in Pascal, vanno segnalate alcune in¬ 
teressanti caratteristiche. Per prima 
cosa il Turbo è al 99% compatibile 
con il Lisa Pascal, quindi molte ap¬ 
plicazioni create in quelfambiente 
dovrebbero essere pronte per la ri¬ 
compilazione con pochissime modi¬ 
fiche (un capitolo del manuale è inte¬ 
ramente dedicato a quest'argomento). 
A differenza delle norme internazio¬ 
nali ANSI per lo standard dei compi¬ 
latori Pascal, il Turbo riconosce i 
primi 63 caratteri degli identificato¬ 
ri; il comando Case ha un comple¬ 
mentare Otherwise; si possono usare 
liberamente valori in notazione esa- 
decimale anteponendo il simbolo $ 


(es. $3BF2); variabili e identificatori 
possono avere nomi uguali (da evita¬ 
re, per chiarezza del listato); la conca¬ 
tenazione di stringhe avviene usando 
il segno + (come in Basic); si posso¬ 
no usare procedure in assembler di ti¬ 
po extemal, o inline (scritte in esade- 
cimale all’interno del corpo del pro¬ 
gramma); le funzioni di lettura e 
scrittura su disco per la gestione di 
file-dati sono notevolmente potenzia¬ 
te. L’elenco delle funzioni aggiunte 
allo standard potrebbe continuare a 
lungo. Siamo di fronte a un vero Pa¬ 
scal, non certo a un limitato subset 
di istruzioni... 

Chi vuole assaporare le delizie del¬ 
la programmazione in pieno stile 
Macintosh può sbizzarrirsi utilizzan¬ 
do le centinaia di chiamate al Tool- 
Box elencate dal manuale. A prezzo 
di un po' di pazienza necessaria all’i¬ 
nizio per districarsi nella giungla del¬ 
le possibilità che si aprono, è possi¬ 
bile ottenere risultati che nessuno di¬ 
stinguerebbe da prodotti realizzati 
professionalmente. La grafica gestita 
dal ToolBox è velocissima e versati¬ 
le, anche se non intuitiva. 

Il Turbo Pascal supporta, nelle 
sue chiamate alla Rom del Mac, la 
gestione dell’AppleTalk, della porta 
SCSI, delle risorse di stampa (Laser 
compresa), del QuickDraw, del SA¬ 
NE (Standard Apple Numeric Envi- 
ronment, comune anche al IIGS), 
del MacInTalk (la sintesi vocale) e 
vanta persino alcune chiamate al 
Graf3D, una serie di chiamate analo¬ 
ghe a quelle del QuickDraw, ma che 
consentono la rotazione, la traslazio- 


Tabella 1. Il Turbo Pascal a confronto con gli altri 
compilatori nella stessa fascia di prezzo. 

Il programma usato per il test della velocità è il classico Sieve, o 
crivello di Eratostene. Il programma per il test di compilazione - 
dimensioni è un'utility di dominio pubblico chiamata MiniEdit. 


Compilatore 

Velocità di 
esecuzione 

Velocità dì 
compilazione 

Dimensione 
del programma 

Turbo Pascal 1.0 

0.3 sec. 

11 sec. 

17.000 

LightSpeed Pascal 2.0 

0.9 sec. 

61 sec. 

12.000 

TML Pascal 2.0 

0.8 sec. 

89 sec. 

10.600 
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ne e il ridimensionamento di oggetti 
tridimensionali. Ovviamente per uti¬ 
lizzare le funzioni più avanzate oc¬ 
correrà un'abbondante dose di espe¬ 
rienza. Se il QuickDraw fosse trop¬ 
po, potete accontentarvi del Turtle- 
Grapichs, una serie di istruzioni Tur¬ 
bo in stile Logo, comuni alle altre 
versioni del compilatore (MS-Dos e 
CP/M), meno potenti ma ugualmen¬ 
te efficaci. 

La documentazione fornita con il 
compilatore è eccellente ma purtrop¬ 
po in inglese e non si prevede nel fu¬ 
turo immediato una sua traduzione. 
Peccato, perché i primi capitoli del 
manuale, sebbene discorsivi e infor¬ 
mali, sono un’ottima introduzione 
non solo al compilatore, ma all'am¬ 
biente di lavoro: il Macintosh. 

Quello che su "Inside Macintosh" 
(la bibbia del programmatore) è spie¬ 
gato in intricati capitoli, qui è rias¬ 
sunto in poche pagine chiare e suffi¬ 
cienti per una visione di insieme. Se¬ 
guendo passo per passo le spiegazio¬ 
ni siamo riuscid a creare un efficien¬ 
te accessorio di scrivania, molto più 
semplicemente che con un compila¬ 
tore C. 

Turbo Pascal al traguardo 

Le tabelle con i dad di confronto 
sono esplicite per quanto riguarda le 
prestazioni in termini di velocità. Il 
punto debole del Turbo, semmai, c 
l'assenza di un linker più versatile. 
Il processo avviene a velocità note¬ 
vole, come abbiamo detto, ma ne ri¬ 
sente la dimensione dell'applicazione 
creata, più voluminosa di quella otte¬ 
nuta con altri compilatori. Probabil¬ 
mente scegliendo con attenzione gli 
unit da utilizzare si sarebbe potuta 
ottenere una riduzione di ingombro 
ma comunque un linker esterno (ma¬ 
gari opzionale) non avrebbe fatto ma¬ 
le. Il pacchetto comprende una copia 
dell'RMaker, un debugger simboli¬ 
co, il TLister (con sorgente Pascal!) 
per listare con diverse opzioni i file 
Turbo, un UnitMover per personaliz¬ 
zare le proprie librerie e i file neces¬ 
sari alla sintesi vocale. 

Per 175mila lire più Iva è un ac¬ 
quisto consigliabile a tutti, neofiti 
del Pascal e programmatori navigati, 
considerando che se il compilatore ri¬ 
scuoterà un successo analogo a quel¬ 
lo della versione MS-Dos, presto nu¬ 
merose ditte presenteranno proprie e- 
spansioni alle librerie e utility per 
tutù i gusti. 

Mario Pettenghi 


Un mouse. 

La sua Mouscotte. 



Niente più segni sulla scrivania. 

E una superficie liscia, ideale, appositamente 
studiata per assicurare la massima scorrevolezza 
ed efficienza al mouse. Sotto, uno strato di gomma: 
la Mouscotte non si sposta. Chiedi Mouscotte ai 
migliori Computer Shop Apple. Oppure richiedilo 
direttamente a Editronica usando il tagliando di 
questa pagina. 


Per ricevere Mouscotte basta compilare e spedire subito questo 
tagliando a Editronica Srl, Corso Monforte 39, 20122 Milano. 

I I 

□ Speditemi subito Mouscotte. Accludo assegno non trasferibile 
intestato a Editronica Srl di lire 29.500 comprensive di Iva e 

. spese di spedizione al mio indirizzo. 

□ Speditemi subito Mouscotte. Accludo ricevuta di versamento di 
lire 29.500 su! conto corrente postale n. 19740208 intestato a 
Editronica Srl. 

. □ Speditemi subito N.Mouscotte. Accludo ricevuta di , 

versamento / assegno di lire... 


□ Desidero fattura. 

Il mio Codice fiscale/Partita Iva è:......... 

Cognome ... Nome. 

Indirizzo..... 

Cap.Città. Prov. 

















EXPO 


Non c'era la Thatcher ad accoglierlo, e neppure Craxi. Tuttavia 
Macintosh ha fatto il suo ingresso trionfale nel mercato 
comune europeo sbarcando a Rotterdam, la città prescelta per ospitare il 
primo MacWorld expo ad aver luogo nell'Antico Continente. 

Un Macintosh 
per il Mec 



Due sono i piani di lettura della 
manifestazione tenutasi a Rotterdam 
tra il 22 e il 24 aprile. Il primo, al¬ 
quanto semplice ed evidente, riguar¬ 
da la manifestazione di per sé: una 
ben organizzata esposizione di tutti i 
prodotti Macintosh, hardware e so¬ 
ftware, made by Apple e made by ter¬ 
ze parti. Lo sforzo, in questo caso, è 
stato davvero notevole per inseguire 
lo scopo, a detta di tutti raggiunto 
pienamente, di riunire in Europa i 
maggiori produttori americani, affin¬ 
ché questi avessero un incontro "rav¬ 
vicinato" con l’utenza europea. 

Il secondo piano di lettura eviden- 
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zia un aspetto ben più importante 
del primo, e cioè l’interesse da parte 
delle case madri americane, con la 
Apple di Cupertino in testa, nei con¬ 
fronti del mercato europeo. L'Euro¬ 
pa, insomma, sta diventando una 
"piazza” molto appetitosa, nella qua¬ 
le i numeri relativi al venduto di Ma¬ 
cintosh e di quanto gli sta attorno 
stanno divendando interessanti. 

Ma non è tanto questo che voglia¬ 
mo sottolineare, quanto il fatto che 
con l’aumento di interesse del nuovo 
mondo nei confronti del nostro vec¬ 
chio mondo, le barriere, che rendeva¬ 
no difficoltoso lo sbarco in Europa 
di tutti quei prodotti hardware e so¬ 
ftware che danno un enorme valore 
aggiunto al Macintosh, si stanno a 
poco a poco sgretolando. 

Nelle sale dell’esposizione abbia¬ 
mo incontrato produttori e importa¬ 
tori italiani che mai avevamo incon¬ 
trato in analoghe manifestazioni 
americane. 

Questo significa, al di là di ogni 
ragionevole dubbio, che presto avre¬ 
mo una molteplicità di punti di rife¬ 
rimento, anche in Italia, per l’acqui¬ 
sto dei prodotti che a ciascuno di noi 
sono essenziali all’espletamento del 
proprio lavoro. 

Se poi la Apple Italia, come ci è 
parso di capire, intende fare un buon 
lavoro di coordinamento tra i vari 
importatori locali, si eviteranno quel¬ 
le sovrapposizioni che in passato so¬ 
no andate a discapito della pluralità 
di prodotti. 

In definitiva, il primo MacWorld 
expo europeo rappresenta un concre¬ 
to avvicinamento del mercato produt¬ 
tore americano al mercato consuma¬ 
tore europeo: un fatto, questo, che 
rappresenta una svolta storica e offre 
alla stessa Apple la possibilità di ag¬ 
gredire il mercato con maggiori chan- 
ces. 

Per questo prevediamo fin d’ora 
che i computer della mela andranno 
a occupare, fin dai prossimi mesi e 
soprattutto nel campo business, 
maggiori quote di quelle attualmente 
già conquistate. 

Tra gli stand di Rotterdam 

Molti dei prodotti esposti al pri¬ 
mo MacWorld expo europeo di Rot¬ 
terdam avevano già fatto il loro in¬ 
gresso nel mercato americano nelle 
due manifestazioni MacWorld di San 
Francisco e AppleWorld di Los An¬ 
geles (vedi Applicando di febbraio e 
aprile). Anche se poche, sono però 


di rilievo le novità presentate in ter¬ 
ra olandese: in testa Mac 86, basato 
sul microprocessore 8086, e Mac 
286, basato invece su un Intel 
80286, due schede prodotte dalla Ast 
dedicate rispettivamente al Macin¬ 
tosh SE e al Macintosh II, che per¬ 
mettono ai due nuovi personal della 
mela di emulare e lavorare in am¬ 
biente Ms-Dos. Così, il Macintosh 
SE sarà in grado di far girare applica¬ 
zioni Ms-Dos compatibilmente a un 
PC XT mentre il Mac II a un PC 
AT, sfruttando in entrambi i casi le 
risorse e le periferiche della casa del¬ 
la mela. In Italia saranno disponibili 
in piena produzione a partire dal me¬ 
se di settembre; per ulteriori infor¬ 
mazioni è possibile rivolgersi al di¬ 
stributore italiano Dht, via Q. Sella 
4, Milano, telefono 02/866425. 

Tre nuovi monitor presentati dalla 
SuperMac Technology, due dedicati 
al Macintosh II e uno al Macintosh 
SE. Per l’Open Mac la risoluzione 
di entrambi i monitor è di 1024 x 
768 pixels e sono stati battezzati Su¬ 
perMac Grafix la versione in bianco 
e nero e SuperMac Spectrum la ver¬ 
sione a colori. Due pagine affiancate 
in formato A4 è invece la visualizza¬ 
zione di SuperMac SuperView, il 
monitor dedicato al modello SE che 
offre una risoluzione di 1024 x 1365 
pixels. Per ulteriori informazioni è 
possibile rivolgersi alla Delta, via 
Morazzone 8, Varese. Telefono 
0332/236336. 

Per espandere la rete AppleTalk fi¬ 
no a un chilometro, la Symbiotic 
propone una soluzione basata sulla 
tecnologia delle fibre ottiche, che tra¬ 
duce i segnali elettrici in segnali lu¬ 
minosi. Per ulteriori informazioni: 
Symbiotic Courtenay House, Water- 
side Park, Western Industriai Area, 
Bracknell, Berks RG121YZ, UK, te¬ 
lefono (0344)485611. 

La francese Abvent, infine, ha pre¬ 
sentato Build 123, un pacchetto so¬ 
ftware dedicato a ingegneri, architet¬ 
ti, e agli uffici immobiliari in gene¬ 
re, che permette di creare e gestire 
un file di clienti dove per ognuno 
viene rappresentata la piantina del¬ 
l’immobile. Abvent, 53, avenue de 
Bretuil, 75007, Parigi, telefono (1) 
47344398. 

Infine, la Agfa-Gevaert, in relazio¬ 
ne alla nuova sezione operativa del¬ 
l’azienda battezzata BIS, acronimo di 
Business Image System, soluzioni 
dedicate al mercato dell’elaborazione 
personale, ha presentato una stam¬ 


la 



pante PostScript. La nuova P400 
PS, così è stata battezzata la nuova 
stampante, è basata sulla tecnologia 
di stampa LED, messa a punto dalla 
stessa Agfa, e può contare su una ri¬ 
soluzione di 406 caratteri per polli¬ 
ce. 

I programmi PostScript possono 
essere inviati alla stampante sia attra¬ 
verso un’interfaccia RS 422, sia tra¬ 
mite una Centronics, e anche da 
un’interfaccia AppleTalk. Con una 
velocità di 18 pagine al minuto e u- 
na capacità media di carico lavoro 
dalle 15 alle 100 mila pagine mese, 
la nuova Agfa P400 PS, è dedicata a 
collegamenti in network per tutte le 
applicazioni di text e image proces¬ 
sing. Per ulteriori informazioni: Ag¬ 
fa Gevaert, viale De Gasperi, Mila¬ 
no. Telefono 02/30741. 

Stefano Benvenuti 
(ha collaborato Mario Magnani) 
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Sfruttando la potenza di Excel, questa Macro di facilissimo 
utilizzo consente la realizzazione di 
note spese complete, corrette, veloci e professionali. 


Piè di lista 
con Excel 


Macro Note Spese (M.N.Spese) 
consente di effettuare tutte le opera¬ 
zioni di input e di output relative 
alla compilazione di una nota spese 
al ritorno da un viaggio, riducendo 
in modo drastico i tempi e gli errori 
di compilazione (vedi riquadro). 

La macro è inoltre in grado di ge¬ 
stire le spese sostenute, sia in valuta 
nazionale, sia in una valuta estera. 

Una seconda macro di servizio, M. 
Nuovo Giornale, ha il compito di 
predisporre i due file necessari per il 
funzionamento della macro principa¬ 
le; in modo particolare serve a colle¬ 
gare il file Parametri con il Database 
(vedi riquadro). Per ragioni di spazio 
non è possibile pubblicare la Macro 
Note Spese in queste pagine. I letto¬ 
ri interessati potranno acquistare il 
dischetto che la contiene al prezzo di 
50 mila lire, utilizzando il tagliando 
del Disk Service a pag. 130. 

La macro consente di effettuare: 

• la registrazione delle varie voci 
in un foglio Contenitore strutturato 
come base di dati; 

• la stampa della nota spese e la re¬ 
gistrazione della stessa. 

La gestione delle singole opzioni 
viene ottenuta tramite il menù visi¬ 
bile in figura 1. La compilazione 
della nota viene eseguita sulla ma¬ 
schera visibile in figura 2. 

Personalizzazione 
della maschera di stampa 

Lapersonalizzazione della masche¬ 
ra, per renderla aderente alle proprie 
esigenze, è attuabile utilizzando i co¬ 
mandi Taglia e Incolla sulle celle in¬ 
teressate dalla modifica. Queste sono 
facilmente individuabili in quanto 
contengono il valore di errore #NO- 
ME?; durante la fase di stampa della 
Nota Spesa lo stesso valore sarà so¬ 
stituito dal contenuto del campo cor¬ 


rispondente. Volendo ad esempio 
spostare la data nella colonna a de¬ 
stra, sarà sufficiente tagliare la cella 
contenente la formula =CMP2 e in¬ 
collarla nella cella desiderata. Ram¬ 
mentiamo che Excel offre una serie 
di aiuti per operare queste modifiche 
quali visualizzazione delle formule, 
griglia, intestazioni di riga e colon¬ 
na, il tutto dal menù Opzioni Visua¬ 
lizza. Il trasferimento dei dati tra il 
file Giornale N. Spese e la masche¬ 
ra, avviene con l'impiego di nomi 
costituiti dalla radice "Cmp" seguito 
da un numero progressivo. Ecco l'e¬ 
lenco dei campi con i rispettivi riferi¬ 
menti: 


Nominativo 

Registr.ne 

Data 


Cmpl 

Cmp2 

Cmp3 


Località 

Cmp4 

Motivazione 

Cmp5 

Valuta 

Cmp6 

Cambio 

Cmp7 

ValBigliettiV 

Cmp8 

ValTaxi 

Cmp9 

Val Vitto 

CmplO 

ValAlbergo 

Cmpll 

Val Varie 

Cmp 12 

BigliettiV 

Cmpl3 

TaxiAutobus 

Cmp 14 

Auto.kmAuto 

Cmpl5 

Autostrada 

Cmp 16 

Vitto 

Cmp 17 

Albergo 

Cmp 18 

Varie 

Cmp 19 

BigliettiUTRAS 

Cmp20 

BigliettiRINALDI 

Cmp21 

BigliettiT.SCHOPMI 

Cmp22 

BigliettiV ARIE 

Cmp23 

NOTE 

Cmp24 


Come si usa M.N.Spese 



A | 

1 ... B 

313 


M.Run 

314 


Option Command r 


Aprite da scrivania la macro M.N. Spese con un doppio clic; premen¬ 
do contemporaneamente i tasti Option e Command digitate il carattere 
(r). 

ovvero 

Aprite dal menù File la macro M.N.Spese; sinceratevi che sia l’unico fi¬ 
le aperto; premendo contemporaneamente i tasti Option e Command digi¬ 
tate il carattere (r). 

Verrà chiesto di aprire il file Parametri relativo al giornale sul quale si 
intende operare; le sucessive operazioni saranno svolte in automatico. 

Scelta di un'opzione 

Digitate l'iniziale dell'opzione desiderata (lettera separata dalla parente¬ 
si), quindi fate clic sul pulsante OK. L'iniziale può essere fornita sia in 
minuscolo che in maiuscolo e il pulsante OK per l’invio può essere sosti¬ 
tuito con i tasti Invio o Return. 
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Limitatamente ad alcuni campi è 
stato utilizzato un formato per la rap¬ 
presentazione dei valori numerici di 
tipo inusuale. 

La verifica del formato di una cella 
si ottiene selezionando la stessa e at¬ 
tivando dal menù Formato l’opzione 
Numero; la personalizzazione dei for¬ 
mati si ottiene sostituendo i valori 
racchiusi tra ("") con quelli appro¬ 
priati. Rammentiamo che questa ope¬ 
razione va eseguita con la cella in 
oggetto selezionata, ma non attiva¬ 
ta. Il disco è inoltre corredato da un 
documento Word riportante le istru¬ 
zioni d’uso della macro. 

Opzione per opzione 

• Input lettera (i) o (I). 

Questa opzione consente di intro¬ 
durre i dati relativi ai singoli campi 
tenendo conto, per ogni singolo cam¬ 
po, del tipo di valore e della posizio¬ 
ne occupata. 

Il box di comunicazione chiede, at¬ 
traverso un messaggio, l’introduzio¬ 
ne del valore relativo a un determina¬ 
to campo; è possibile fornire tale 
valore nei seguenti modi: 


1) digitando le informazioni; auto¬ 
maticamente verranno rifiutate le in¬ 
formazioni di tipo diverso dal con¬ 
sentito (es. lettere in un campo nu¬ 
merico) 

2) facendo clic su una cella che 
contiene già il valore da introdurre; 

3) combinando le due citate possi¬ 


Figura 1. 


bilità e cioè eseguendo delle opera¬ 
zioni con gli operatori appropriati 
(& per le stringhe +-*/ A per i valori 
numerici); 

4) introducendo delle formule di o- 
perazione con le quali calcolare il da¬ 
to finale (es. la formula =8.5+6 for¬ 
nirà il valore 14.5). 


Per quanto riguarda i punti 3) e 4) 
va ricordato che il contenuto finale 
del box Input deve iniziare con un se¬ 
gno di uguale (=), non deve termina¬ 
re con alcun carattere operatore e che 
le stringhe devono essere racchiuse 
tra virgolette (") (figura 3). 

Con l'opzione Input attivata è pos¬ 


sibile attivare l’utility di Edit con la 
quale si possono correggere o ag¬ 
giungere dati in tutte le celle che 
compongono il database; per ottene¬ 
re quanto sopra, è sufficiente digitare 
i caratteri (ce) in risposta alla richie¬ 
sta di Input. 

I campi destinati a contenere i dati 
relativi al numero progressivo di re¬ 
gistrazione e alla data di registrazio¬ 
ne vengono automaticamente compi¬ 
lati. 

I campi data, nominativo, località, 
motivazione, valuta Si/No, non ac¬ 
cettano un input nullo (tasto Ok in 
risposta all’Input); i rimanenti cam¬ 
pi fornendo un’invio come risposta 
all’input fanno saltare l’esecuzione 
della Macro al campo successivo. 

Per terminare il lavoro di introdu¬ 
zione dati è necessario premere il 
pulsante Cancel in risposta alla do¬ 
manda: "Introduci il valore 

.; Cancel per terminare". 

La scelta di interrompere il lavoro di 
introduzione è realizzabile in tutti i 
box di Input; pena del suo utilizzo, 
in un campo diverso dal primo, è la 
perdita dei dati contenuti nell'ultima 
riga. 

Per esempio se si sono già digitati 
i campi Descrizione Lavoro e Codi¬ 
ce Articolo e si impartisce il Cancel 
nel campo Parziale, limitatamente a 
quella riga, si perderanno i dati stes¬ 
si. L'uscita dalla fase di Input corri¬ 
sponde alla richiesta di salvataggio 
dati (figura 4). 

La scelta di non salvataggio, trami¬ 
te il pulsante Cancel, pregiudica tut¬ 
to il lavoro di introduzione dati; è 
necessario pertanto prestare molta at¬ 
tenzione a questa fase del lavoro. 


Come si usa M.Nuovo Giornale 



A 

B 

313 


M.Run 

314 


Option Command r 


Aprite da scrivania la macro M. Nuovo Giornale con un doppio clic; 
premendo contemporaneamente i tasti Option e Command digitate il ca¬ 
rattere (r). 

ovvero 

Aprite dal menu File la macro M. Nuovo Giornale; sinceratevi che sia 
l’unico file aperto; premendo contemporaneamente i tasti Option e Com¬ 
mand digitate il carattere (r). 

La macro automaticamente aprirà i file Matrice, quindi chiederà di intro¬ 
durre i dati necessari per definire il nome del file DB. 

L’esecuzione della macro continuerà presentante il box dell'opzione EX¬ 
CEL Registra con il Nome al fine di salvare il file Parametri e sucessiva- 
mente il File DB, nella cartella precedentemente predisposta. 
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Milano, 20 maggio 87 






NOTA SPESE 



Da rimborsare al Sig. Mario Beckerman 



per viaggio a 


Boston in data 12 maggio 



motivato da 


MacWorld Expo 



VALUTA 


dollari USA 




0 

_ biglietti : ferr., W.L.,aereo 

£ 

1.300.000 


150 

_ autopubbliche .tram 

£ 

15.000 


0 

_ autovettura pers. (km 150 a £ 350 km 

£ 

52.500 


0 

_ pedaggi autostrade 

£ 

21.000 


450 

_ spese di vitto 

£ 

150.000 


620 

_ spese di albergo 

£ 

150.000 


400 

_ spese varie 

£ 

90.000 


1.620 

_ Totale valuta 1.620 cambio di £ 1293 

£ 

2.094.660 



.SPESE DA RIMBORSARE 

£ 

3.873.160 



_ Biglietti di viaggio tramite UTRAS Roma 

£ 

0 



_ Biglietti di viaggio tramite RINALDI Milano 

£ 

0 



_ Biglietti di viaggio tramite TRAVEL SHOP Milano 

£ 

450.000 



_ Varie 

£ 

1.500.000 



.TOTALE NOTA SPESE 

£ 

5.823.160 

VISTO 


Firma per quietanza 



NOTE : 


La durata totale del viaggio è stata di nove giorni 




Figura 2. 


• Stampa Nota Spesa lettera 
(s) o (S). 

La gestione di questa opzione è af¬ 
fidata alla richiesta di input visibile 
in figura 5. Automaticamente ver¬ 
ranno esclusi i valori che non hanno 
una corrispondenza alfinterno del 


giornale note spese. Al termine della 
compilazione della maschera nota 
spesa, viene fornita la possibilità di 
registrare il documento elaborato e a 
tal fine viene proposto il nome di 
un file attingendo dai valori di cui la 
nota spese in corso. 


Al fine di consentire l’utilizzo di 
un formato di carta diverso da quello 
impostato per default da Excel, vie¬ 
ne presentato, in fase di stampa per 
ogni documento, il box visibile in 
figura 6, nel quale bisogna impo¬ 
stare le varie opzioni secondo le pro- 
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Figura 3. 



Uuoi Saluare il 
documento ? Cancel 
per No 



Cancel ) 


Figura 4. 


— Stampa Parcelle 1 

Introduci il Progressiuo di cui la 
parcella da stampare 



[Annulla 


Figura 5. 



Figura 6. 




pie esigenze quindi premere OK. 

• Uscire lettera (u) o (U). 

Attivando questa opzione si chiu¬ 
dono tutti i file a video eccetto la 
macro. Per chiudere la macro fare un 
clic sul pulsante di chiusura. 

Antonella Ruzzante 


Questo programma è disponibile 
su dischetto. L’elenco, i prezzi 
e le modalità d’ordine di questo 
e degli altri dischetti disponibili 
sono riportati nella rubrica 
Disk Service. 

s J 


. 4:lmg®g i Eii S ! r iB 

i loro problemi 

2zY2 

"'Macintosh 


RSSO Engièeerìjh-g: 

Progettazióne 
Consulenza Software 







< « '> 



il soluzione: 

Asédcate 

calcolo di strutture irrcémento 
armato in zona sismica o meno,. 
Fondazioni con trave rovescia. 
Telai non ortogonali. 

. wASSOgrapti . 

generazione automatica dei di¬ 
segni esecutivi di travi, fonda¬ 
zioni, pilastri. Scelta ferri 
dritti o piegati.Computo metrico. 

ASSOfond 

trave alla Winkler; fondazioni 
su plinti: progetto e verifica; 
fondazioni su pali. 


calc,graph e fond rappresentano 
il primo reale sistema di lavoro 
integrato per l'ingegneria 
civile, prevedendo la completa 
interscambiabilità dei dati. 


ASSOsezioni 

Verifica e progetto di sezioni 
rettangolari o a T soggette 
anche a carichi di punta. 



ASSO Engineering 

Progettazione 
Consulenza Software 


Roma, via Tessalonica 47 
tei. 06/5573027 


Macintosh e' un marchio registrato 
della appiè computer ine. 


















































































































Disco 21 e disco 22: altre due preziose raccolte di programmi liberi. 
In particolare troviamo ottime utility e... 

Tantissimi disegni 


Sempre più consensi sta avendo il 
Freesoftware per Macintosh, che gra¬ 
zie ai vostri consigli e suggerimenti 
si sta evolvendo in maniera rapida, 
al punto che è già stata approntata u- 
na quarta serie, di cui parleremo nel 
prossimo numero. Occupiamoci ora 
di altri dischetti della seconda serie 
di Freesoftware, ricordando ancora u- 
na volta che normalmente i program¬ 
mi più complessi sono accompagna¬ 
ti dalle relative istruzioni, scritte sot¬ 
to forma di documenti generalmente 
creati con MacWrite o Microsoft 
Word: per poterle leggere sarà suffi¬ 
ciente essere in possesso di uno di 
questi programmi, o di un qualsiasi 
altro word processor. 

Disco 21 

• Font/DA Mover 3.2: Utility. 

Questo programma è ormai noto a 
tutti gli utilizzatori di Macintosh, e 


Figura 1. 

r é File Modify Options 


serve a installare, o trasferire da un e- 
lemento di sistema a un altro, sia 
font di caratteri, sia accessori di scri¬ 
vania direttamente nel file System; 
in questo caso viene fornita la versio¬ 
ne 3.2 in versione originale america¬ 
na aggiornata. 

• Screen Maker: Utility. 

Quest’applicazione consente di so¬ 
stituire la videata di avvio tipica del 
Macintosh con un qualsiasi disegno 
creato con MacPaint, così da perso¬ 
nalizzare il vostro dischetto d'avvio. 

• Slide Show: Utility. 

E' un programma molto utile per 
chi possiede numerose immagini 
create con MacPaint; infatti permet¬ 
te di vedere tutti i disegni uno dopo 
l'altro senza dover aprire l'applicazio¬ 


ne MacPaint: è anche possibile me¬ 
morizzare una temporizzazione se¬ 
condo cui far scorrere le immagini 
su video; per far ciò quando compare 
la prima immagine è sufficiente pre¬ 
mere un numero da 1 a 9, oppure 
per tornare al Finder battere la barra 
spaziatrice. 

• IconMaker: Utility. 

Questa utility permette di disegna¬ 
re da sé e quindi personalizzare a pro¬ 
prio piacimento, le icone dei vari 
programmi. 

• PaintCopier: Utility. 

Con questo programma è possibi¬ 
le aprire un disegno creato con Mac¬ 
Paint e ingrandirne un settore per 
poi procedere a stamparlo in formato 
manifesto. 



é File Rctiuate Select Edit Flippit fìnimotion Functiorts 



OSÉXYfóOO a programralng utility by Chet J Graham. 
Use this program to remove or add horizontal tabs in 
text files TabUtil can also remove tralling spaces and 
control characters Here are thè options 

OptiOns (86 0 ) - «Uh. tab lev.l, set proyanr* <0 echo to diiplay, 
strip trdilina spaces., or strip oontrol cheraoters 
Ent Bt) (88 E) - remcv* extraneous spaoes from a text file and add in 
horizontal tab characttrt. Comprati.» text file* 


Detab (86D) - remove all horizontal tabi and replace wfth th* eorr»ct 
number of spac.s Cofcvnns ar* pre-sarve-d oorreclly. 

QUII (8IQ)-.xii th» program and return to th. finder 

This program wat veritieri to aid th» migration of toxt files from th» Appi» 
MDS envb-onm.nt t* other hott computer» TabUtil i» vrltten tn Coniulair C 
Comments or questions to Compuserr» 75056,1224 or Delphi Cj*t. Enjoy ! 


Figura 4. 


Figura 3. 





































































































































































Un Club per te. 

Un Club nato per 
aiutarti 

a imparare senza 
fatica il Basic. 

Un Club nato per 
fornirti routine 
già pronte che ti 
permetteranno di 
scrivere programmi 
da professionista 
per il tuo Macintosh. 
Un Club pieno 
di scambi di idee fra 
i soci, di consigli, à 
di programmi, I 
di suggerimenti. 1 




Il Basic Microsoft per 
Macintosh è 
facile e può dare 
grandi soddisfazioni. 
Imparare a usarne 
tutte le potenzialità 
diventa ancor 
più facile iscrivendoti 

subito al 
Mac Basic Club. 
Infatti, se il Basic 
Microsoft 2.1 
ancora non 
l'hai, iscriverti 
al Mac Basic Club 
non costa 
proprio nulla. 


S e il vostro Mac non è in grado 
di realizzare questi grafici, 
comprategli Cricket Graph... 



Cricket Graph 


Tutte le necessità di rappresentazione grafica sia per uso scientifico o 
gestionale sono soddisfatte da Cricket Graph. E* possibile creare ben 12 ti¬ 
pi di grafici diversi, rivoluzionando il modo secondo cui vengono rappre¬ 
sentati i dati mediante l'aggiunta di effetti tridimensionali e l'uso di colori. 
E' inoltre possibile controllare rimpaginazione reàlizzando rappresenta¬ 
zioni di grande effetto visivo. 

Cricket Graph permette anche di ottenere curve di regressione, grafici 
a 3D con effetto di profondità; Si possono gestire sino a 2000 punti per se¬ 
rie. E' anche possibile eseguire semplici trasformazioni matematiche 
(dalle moltiplicazioni alle derivate), nonché ottenere ordinamenti, rag¬ 
gruppamenti di dati, operazioni di "smooth" e interpolazioni. 

Trasferimenti di dati 

Cricket Graph permette di impostare i dati in righe e colonne, come u- 
no spreadsheet,, o importare dati in formato SILK (Multiplan, Excel, Omnis 
3) o da file di testo (MacWrite o Microsoft Word); permette inoltre di im¬ 
portare dati da StatWorks; anche da Jaww o altre applicazioni tramite la 
clipboard. E' pure possibile esportare i grafici elaborati in formato PICT 
permettendo di modificarli direttamente con Mac Draw, Mac Draft o Cric¬ 
ket Draw. Switcher viene fornito assieme al programma. 

Stampa a colori 

Cricket Graph permette di scegliere tra 8 colori. La stampa a colori è 
supportata sia per la Image Writer II, che per i plotter Apple, Hewlett Pac¬ 
kard 7470A e 7475A. MacWrite e Word possono anche essere usati per 
stampare grafici importati a colori. 


Distribuito in esclusiva da: 


Corso Italia 149-34170 Gorizia - Telefono 0481 /30909 - 32790 



Disponibile negli Apple Center o per corrispondenza 

in versione italiana 


Configurazione: Prezzo: 

Macintosh 512/800, Plus, SE, II. 390.000 lire + iva. 



• JoyPaint: Utility. 

E' una utility molto comoda, che 
permette di eseguire delle modifiche 
(inversione orizzontale, verticale e 
dei pixels componenti il disegno) su 
un’intera immagine creata con Mac¬ 
Paint, mentre col programma origi¬ 
nale solitamente si possono effettua¬ 
re modifiche solo per pezzi successi¬ 
vi (figura 1). 

• Painter's Helper: 

Applicazione. 

Questo programma di grafica per¬ 
mette di disegnare elementi tecnici 
con notevole precisione, per poi sal¬ 
vare il documento in formato Mac¬ 
Paint (figura 2). 

Disco 22 

• DrawPaint 1.0: Utility. 

Permette di trasformare un file 
creato con MacDraw in un file leggi¬ 
bile da MacPaint; tuttavia bisogna 
fare in modo che il disegno creato 
con MacDraw sia salvato in formato 
PICT o ILL (a seconda della versio¬ 
ne di Draw di cui si è in possesso), 
altrimenti non è possibile la conver¬ 
sione. 

• TabUtil: Utility. 

E' un'utility molto comoda per chi 
deve trasferire dei file in un certo for¬ 
mato, e vuole inserire alfinterno del 
testo dei comandi particolari, per far 
sì che il file una volta trasferito sia 
pronto per eventuali manipolazioni 
particolari (figura 3). 

• FastEddie 2.2: Utility. 

Per usufruire delle caratteristiche 
di questo programma è sufficiente e- 
seguire formai classico doppio clic 
col mouse sulla relativa icona: a que¬ 
sto punto tutte le operazioni che pas¬ 
sano via Finder verranno velocizzate 
al massimo, con un risparmio di 
tempo di circa il 60%. 

• MacWait2: Utility. 

E’ una utility che oscura il video 
del Macintosh dopo un certo numero 
di secondi, regolabili a piacere da par¬ 
te dell’utente, di inattività della mac¬ 
china. 

• Iconer: Utility. 

E’ un simpatico programma che 
permette di personalizzare le icone 
dei programmi in proprio possesso, 
andando a modificare pixel per pixel 
il disegno della relativa icona (figu¬ 
ra 4). 













































































Sette minuti 
e la chiave 


Sette minuti possono aprirti la porta 
di un nuovo mondo: quello dei 
programmi scritti da te come 
servono a te, sulla misura 
delle tue esigenze. Sette minuti 
bastano per decidere di entrare 
nel Club di chi sa ottenere dal 
suo Macintosh esattamente 
quello che vuole. Il Mac Basic Club 
ti offre proprio questo: tutorial in 
italiano, routines, trucchi e segreti, 
suggerimenti, idee. In pratica il Club 
offre tutto il supporto che ti è 
necessario per imparare senza 
fatica il Basic Microsoft. E te lo 
offre gratis se non possiedi ancora il 
Microsoft Basic 2.1. Iscrivendoti al 
Mac Basic Club riceverai infatti, 



del Mac Basic 
Club è tua 



subito e direttamente 
al tuo indirizzo, 
il Microsoft 
Basic 2.1 in 
confezione 
originale 
completa di 
manuale, 
più il primo 
numero del 
bimestrale su dischetto del 
Mac Basic Club. Gli altri cinque dischetti 
ti verranno spediti via via che verranno 
pubblicati. Ma tu pagherai solo il prezzo 
del Microsoft Basic 2.1, e cioè 327.000 
lire (più Iva 9%). Ma anche se possiedi già 
il Basic puoi iscriverti al Mac Basic Club 
in questo caso riceverai solo i sei numeri 
del bimestrale su dischetto del Club, e 
pagherai 160.000 lire (più Iva 9%). 


Il Microsoft Basic permette di 
programmare in un ambiente 
altamente interattivo, 
sfruttando tutte le potenzialità 
_ di Macintosh: la grafica, 

* il suono, le finestre, i menù. 

Comprende strutture 
di controllo avanzate come le 
istruzioni PRINT USING, 
IF/THEN/ELSE, WHILE/WEND, ecc. 
In più, rispetto al Microsoft Basic 2.0, 
il Microsoft Basic 2.1 è in pratica 
due volte più veloce. 
Ed è sicuramente il 
linguaggio che più 
rapidamente e più 
facilmente ti farà 
ottenere risultati 
davvero 
professionali. 
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Sei proprio sicuro 
che il tuo computer 
sia sempre al sicuro? 

Incidenti di trasporto, furti anche dall'auto o dalla camera 
d'albergo, cortocircuiti, bevande rovesciate sulla tastiera, 
bambini o inesperti che ci mettono le mani... Ecco i pericoli 
che correva il tuo computer prima della polizza Applicando 


Condizioni generali di assicura¬ 
zione: 

1) Premessa : a) l’adesione alla 
presente polizza è riservata ai pro¬ 
prietari di un Personal Computer il 
cui valore stabilito come alla Condi¬ 
zione 61 sia superiore a L. 
2.500.000 Iva compresa; b) l'adesio¬ 
ne alla presente polizza da parte dei 
proprietari di personal computer av¬ 
verrà a mezzo invio di apposita car¬ 
tolina con il relativo importo di pre¬ 
mio; c) l’intestatario della cartolina 
sarà considerato a tutti gli effetti co¬ 
me l'Assicurato; d) la garanzia sarà 
operante dalle ore 24 del giorno di 
spedizione della cartolina, risultante 
dal timbro postale. La copertura a- 
vrà durata un anno, sempre che la 
data di inizio della garanzia sia com¬ 
presa nel periodo di validità della 
convenzione. 

Garanzie e condizioni 

2) Sez. I - Danni materiali. Deri¬ 
vanti da: a) incendio, opera di spe¬ 
gnimento e salvataggio, fulmine, e- 
splosione, scoppio, implosione; b) a- 
cqua e liquidi in genere, inondazio¬ 
ne, alluvione, trombe, uragani, ge¬ 
lo, ghiaccio, neve, grandine, valan¬ 
ga, caduta massi e altri simili even¬ 
ti; c) superamento del muro del suo¬ 
no, caduta di aeromobili o cose da 
essi trasportate; d) corto circuito, 
variazione di corrente, sovratensio¬ 
ne arco voltaico, deficienze di isola¬ 
mento, effetti di elettricità statica, 
induzione; e) imperizia, negligen¬ 
za, errata manovra, nonché azioni 
dolose e colpose in genere; f) tra¬ 


sporti e smontaggi connessi con la¬ 
vori di pulizia o di manuten¬ 
zione; g) furto e rapina; h) terremo¬ 
to, maremoto o eruzioni vulcani¬ 
che; i) persone che prendono parte 
a tumulti popolari, scioperi, som¬ 
mosse e che perpetrino individual¬ 
mente o in associazione atti di terro¬ 
rismo o sabotaggio verificatisi in 
occasioni di serrate. 

3) Sez. II - Responsabilità Civile 
Terzi: L'assicurazione si intende i- 
noltre prestata per la Responsabili¬ 
tà Civile derivante all'Assicurato 
dalla proprietà e dall'uso personale 
del computer assicurato, identifica¬ 
to nel certificato di assicurazione. I 
massimali di garanzia si intendono 
fissati in: L. 100.000.000 per sini¬ 
stro con il limite di L. 100.000.000 
per ciascuna persona deceduta o 
che abbia subito lesioni personali 
L. 100.000.000 per danni a cose e/o 
animali. 

4) Esclusioni: La Società non è 
obbligata per i danni dovuti a: - do¬ 
lo dell'Assicurato; - corrosione, de¬ 
perimento, logoramento che siano 
conseguenza del normale uso o fun¬ 
zionamento o causati dagli effetti 
graduali degli agenti atmosferici; - 
per i quali deve rispondere il forni¬ 
tore, venditore o locatore degli enti 
assicurati per legge o per contratto 
o per inaaeguata manutenzione; - 
causati da difetti di materiale o di 
costruzione che esistevano già all'at¬ 
to della stipulazione della polizza e 
erano a conoscenza dell'Assicurato;- 
causati direttamente o indirettamen¬ 


te da avvenimenti bellici, sommos¬ 
se militari, invasioni, adozione di 
misure da parte di potenze straniere, 
rivoluzione, ribellione, insurrezio¬ 
ne, assunzione ©usurpazione di pote¬ 
re di carattere militare, sequestri; - 
verificatisi in occasione di esplosio¬ 
ne, radiazione nuclerare o di conta¬ 
minazione radioattiva; - uso impro¬ 
prio del bene (mancato rispetto del¬ 
le norme di impiego dettate dal co¬ 
struttore); - danni estetici (quelli in¬ 
teressanti l'involucro esterno che 
non sia conseguenza di un danno ri¬ 
sarcibile a termine della presente po¬ 
lizza); - guasti casualmente ricondu¬ 
cibili a interventi, a riparazioni e/o 
modifiche effettuate aa un centro 
non autorizzato dalla casa costruttri¬ 
ce della macchina; - danni indiretti 
in genere. 

5) Operatività della garanzia: a) 
la garanzia è operante solamente se 
gli enti assicurati sono ubicati pres¬ 
so il domicilio dell'Assicurato o in 
luoghi diversi da questi se in posses¬ 
so dell’Assicurato; b) la garanzia è 
pure efficace se i beni si trovano sul¬ 
l’autovettura in uso all’Assicurato, 
salvo i seguenti casi: - qualora l’au- 


Sì ! Desidero assicurare i miei/il mio computer, in¬ 
viatemi a stretto giro di posta il certificato emesso dal¬ 
la Ras. L'assicurazione avrà valore a decorrere dalie 
ore 24 del giorno di spedizione della mia adesione. 
Per la data fa fede il timbro postale. 

COGNOME_ 



NOME_ 

INDIRIZZO. 


CAP- 


Città 


-PROV. 


Assicuro i/il seguente personal: 
Marca e Modello 


N. di matricola 


Valore (Iva compresa) 


Con le seguenti periferiche (stampanti, video, drive, hard-disk, ecc.): 

Marca e Modello N. di matricola Valore (Iva compresa) 


In caso di spazio insufficiente ricopiate su un foglio il tagliando indicando i prodotti che intendete assicurare. 

Per un totale complessivo di Lire ... su cui pa¬ 

go il premio calcolato in base alla tabella riportata qui sopra. Allego assegno non trasferibile di 
Lire.intestato a Editronica srl, Corso Monforte 39, 20122 Milano. 


tovettura venga lasciata incustodita 
dalle ore 22 alle ore 6; - qualora 
l'autovettura regolarmente chiusa a 
chiave venga lasciata incustodita 
dalle ore 6 alle ore 22 e gli enti assi¬ 
curati non opportunamente occulta¬ 
ti nel bagagliaio; c) limitatamente 
ai danni di rottura la garanzia è effi¬ 
cace solamente nel caso questi sia¬ 
no dovuti a un incidente in cui ri¬ 
manga coinvolto anche il veicolo 
in uso dell’Assicurato che trasporta¬ 
va i beni assicurati; d) per gli enti 
per i quali non è stato stipulato il 
contratto di manutenzione e/o assi¬ 
stenza con la casa costruttrice e/o 
ditte di essa mandatarie qualora l'en¬ 
te richieda per norma del fornitore 
detto contratto, la società non ri¬ 
sponde dei danni verificatisi in con¬ 
seguenza di guasto meccanico e/o e- 
lettrico salvo che l'Assicurato pro¬ 
vi che tale guasto sia causato da e- 
vento esterno agli enti assicurati o 
da incendio originato da uno di que¬ 
sti enti. 

6) Somma Assicurata: La somma 
assicurata per ciascun ente deve cor¬ 
rispondere al costo di rimpiazzo, os¬ 
sia al prezzo di listino della casa co¬ 
struttrice ed escluso ogni sconto o 
prezzo di favore di un ente nuovo, 
eguale o equivalente per caratteristi¬ 
che, prestazioni e rendimento eco¬ 
nomico. 

7) Premio: Per ogni singola appli¬ 
cazione è stabilito un premio forfet¬ 
tario omnicomprensivo cosi calco¬ 
lato: 


Somma assicurata 

Premio 

da 

2.500.000 


a 

3.000.000 

50.000 

da 

3.000.000 


a 

5.000.000 

.65.000 

da 

5.000.000 


a 

7.000.000 

80.000 

da 

7.000.000 


a 

10.000.000 

100.000 

da 

10.000.000 


a 

15.000.000 

120.000 

da 

15.000.000 


a 

20.000.000 

150.000 


8) Franchigia. Per ogni e qualsia¬ 
si danno che colpisca gli enti assicu¬ 
rati è stabilita una franchigia di: L. 
50.000 per somma assicurata fino a 
L. 5.000.000; L. 100.000 per som¬ 
ma assicurata superiore a L. 
5.000.000. Per sinistri causati da e- 
venti come ai punti e) ed h) delle ga¬ 
ranzie prestate, la Società liquiderà 
i danni sotto deduzione di uno sco¬ 
perto pari al 20% della somma assi¬ 
curata, col minimo delle franchigie 
sopra stabilite. 

9) Rinvio alle norme di legge. 
Per tutto quanto non è qui diversa- 
mente regolato, valgono le norme 
di legge. 


e applicando vi mettono al sicuro 
































UTILITY 



E' possibile creare, con questa routine, una RamDisk 
di 16K in ambiente DOS 3.3, da trattare esattamente 
come un disk drive inserito nello slot 5. Tutti 
i comandi disco funzionano come per un vero dischetto. 

Più veloce 
con il disco virtuale 


Se lo scambio di figurine di calcia¬ 
tori è divertente, quello dei dischetti 
nei drive non diverte affatto. Lo po¬ 
trete però evitare immagazzinando le 
utility che usate spesso su una 
RamDisk alloggiata nella memoria 
del vostro Apple, ottenendo una 
maggiore rapidità di accesso senza 
consumare prezioso spazio sui di¬ 
schetti. 

Il programma RAMDISK.SETUP 
(listato 1) modifica il DOS 3.3 e 
permette di usare la memoria a com¬ 
mutazione di banco come RAM 
disk, ad alta velocità di accesso, di 
60 settori. 

Funziona proprio come un dischet¬ 
to; ne potete fare il catalog, potete 
salvare e scrivere su di esso file e 
programmi con i comandi SAVE, 
BS AVE e WRITE, e caricare, esegui¬ 
re e leggere file e programmi con 
LOAD, RUN, BRUN e READ. 

Come si usa RamDisk 

Per installare la modifica, fate 
BRUN RAMDISK.SETUP. Poi po¬ 
tete accedere alla RamDisk specifi¬ 
cando lo slot 5. Non avete bisogno 
di introdurre i parametri di drive e di 
volume, e comunque se lo fate il 
programma li ignora. La RamDisk 
funziona con FID, Diversi-DOS, 
PLE, GPLE e altri programmi che 
non modifichino la routine del DOS 
di lettura e scrittura di traccia/settore 
(RWTS, dall’inglese Read/Write a 
Track/Sector). 

La RamDisk è utile in particolare 
per memorizzare piccole routine usa¬ 
te di frequente, come il FID, i pro¬ 
grammi di conversione da esadecima- 
le a decimale e i file EXEC (ad esem¬ 
pio per trovare l’indirizzo iniziale e 


la lunghezza del più recente file cari¬ 
cato con BLOAD o eseguito con 
BRUN). Può essere utile anche per 
applicazioni che richiedano l’accesso 
ad alta velocità al dischetto, come le 
routine di ordinamento. 

Se avete un assembler, per intro¬ 
durre il programma copiate il codice 
sorgente del listato 1 e assemblate¬ 
lo. Se non avete un assembler intro¬ 
ducete il codice esadecimale del lista¬ 
to 1 e salvate il programma con il 
comando: 


BSAVE RAMDISK.SETUP, 
A$2000,L$198 


Per un aiuto nell’introduzione dei 
listati di Applicando vedete la rubri¬ 
ca "Per chi comincia" in questo nu¬ 
mero della rivista. 

Configurazione del dischetto 

Il DOS 3.3 memorizza le informa¬ 
zioni su un dischetto in 35 tracce 
concentriche (numerate da $0 a $22). 
Ogni traccia è divisa in 16 settori 
(numerati da $0 a $F) e ogni settore 
contiene 256 ($100) byte, quindi o- 
gni traccia contiene 4.096 ($1000) 
byte. 

Il DOS impiega la sua routine 
RWTS per leggere o scrivere su spe¬ 
cifiche tracce e specifici settori. La 
routine RWTS riceve le sue informa¬ 
zioni su slot, drive, volume, traccia, 
settore e operazione voluta (cercare, 
leggere, scrivere o formattare) dalla 
routine di controllo dell’input/output 
(IOB). 

La traccia $11 di ogni dischetto 
conserva una tavola del contenuto 
del volume (VTOC) nel settore $0, 
e una directory nei settori da $1 a 


$F. La VTOC contiene le mappe di 
bit, che specificano le tracce e i set¬ 
tori occupati al presente da dati. Il 
DOS si procura dalla directory le 
combinazioni di traccia/settore usate 
da ciascun file. 

Commutazione di banco 

La memoria a commutazione di 
banco (la language card nel II Plus) 
è una sezione della RAM che può es¬ 
sere commutata nello spazio d’indi- 
rizzamento del 6502 a $DOOO- 
$FFFF in luogo delle ROM dell’Ap¬ 
plesoft e del Monitor. 

Inoltre le lo cazioni di memoria 
$D000-$DFFF sono duplicate anco¬ 
ra una volta. Questa sezione aggiun¬ 
tiva di 4K è chiamata banco 2, men¬ 
tre il resto della memoria a commu¬ 
tazione di banco è il banco 1. La 
commutazione da ROM a RAM e da 
banco 1 a banco 2 si ottiene attivan¬ 
do soft switch. 

Come lavora il patch 

Essenzialmente la modifica del 
DOS per ottenere la Ram Disk è u- 
na RWTS su misura. Quando l’uten¬ 
te specifica lo slot 5 il patch della 
Ram Disk trasferisce dati sulla e dal¬ 
la RAM situata nella memoria a 
commutazione di banco. 

Se non viene specificato lo slot 5 
il controllo toma alla RWTS del 
DOS 3.3. 

Il patch fa sì che il DOS 3.3 tratti 
la memoria a commutazione di ban¬ 
co come se occupasse le tracce $1, 
$2, $3 e $11 di un dischetto a quat¬ 
tro tracce. 

La traccia $11 contiene VTOC e 
directory della Ram Disk. Le mappe 
di bit della VTOC della Ram Disk 
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PER STAMPARE A MISURA DI PC. 





fin 



J a Mannesmann Tally produce 

una completa serie di stampanti 
capaci di soddisfare qualsiasi 
esigenza di applicazione in colle¬ 
gamento con tutti i PC presenti 
sul mercato. 

MT 80+/PC Stampanti seriali 
a impatto a matrice di punti a elevata qualità 
e basso costo, progettate per connessioni a 
micro computer per ufficio e per casa. Modelli 
a 80 colonne, velocità di stampa di rispettiva¬ 
mente 100 e 130 Cps, stampa bidirezionale ot¬ 
timizzata ed anche grafica, strappo moduli faci¬ 
litato. 

Destinate ai PC sono adatte anche per sistemi 
di "word processing”. 

MT 85/86 Rispettivamente a 80 e 136 colon¬ 
ne, velocità di stampa 180 Cps in alta velocità 
e 45 Cps in alta definizione, fonti di carattere 
opzionali per stili di stampa diversi, interfaccia 
modulare, caricatore automatico di fogli singo¬ 
li in opzione, stampa bidirezionale ottimizzata, 
strappo moduli facilitato, rumorosità < 55 
Dba. 

MT 87/88 Rispettivamente a 80 e a 136 co¬ 
lonne. Velocità di stampa 200 Cps in alta velo¬ 
cità e 50 Cps in alta definizione, inseritore au¬ 
tomatico orizzontale di fogli, fonti di carattere 
opzionali per stili di stampa sempre diversi, in¬ 
terfaccia modulare, caricatore automatico di 
fogli singoli in opzione, stampa bidirezionale 
ottimizzata, strappo moduli facilitato, rumoro¬ 
sità < 57 Dba. 

MT 290/AFF Stampante per sistemi PC pro¬ 
fessionali, caratterizzata da opzioni per la ge¬ 
stione dei moduli, alta qualità di scrittura ed 
elevati volumi di stampa. Stampante a 132 co¬ 
lonne, velocità di stampa 200 Cps in alta velo¬ 
cità e 50 Cps in alta definizione, versione con 
inseritore automatico di fogli singoli opzionale, 
capacità di gestire elevati carichi di lavoro. 
MT 330 Silenziosa, flessibile nella gestione 
della modulistica con tre qualità di stampa e la 
possibilità di inserire fonti di carattere opziona¬ 
li. Stampante a 136 colonne con testina di 
stampa a 24 aghi, velocità di stampa 300 Cps 
in qualità lettera, trattori di spinta e strappo 
moduli facilitato, inserimento frontale di fogli 
singoli, versione stampa a colori, caricatore au¬ 
tomatico di fogli singoli opzionale, rumorosità 
< 53 Dba. 
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sono inizializzate per indicare che 
tutte le tracce sono piene tranne le 
tracce $1, $2, $3 e $11. 

Le tracce $1, $2 e $3 occupano 
$E000-ERFF, $F000-$FFFF e le lo¬ 
cazioni del banco 1 $D000-$DFFF 
nella memoria a commutazione di 
banco. La tracci a $11 occupa le loca¬ 
zioni $D000-$DFFF del banco 2. Ci¬ 
gni settore in una traccia della Ram 
Disk occupa una pagina ($100 byte) 
di memoria nel blocco di memoria 
corrispondente alla traccia. 

Per esempio la traccia $1, settore 
$9, occupa le locazioni di memoria 
da $E900 a $E9FF della RAM card, 
mentre la traccia $3, settore $F occu¬ 
pa le locazioni da $DF00 a $DFFF 
nel banco 1. 

Funziona così 

Vediamo ora come funziona Ram- 
Disk Setup. 

• Installazione. RAMDISK. 
SETUP (listato 1) consta di due 
parti. La prima parte è una sezione 

■■■■■■■■■■■■■■■ 


d'inizializzazione (linee 50-156) che 
riloca la seconda parte nella sua posi¬ 
zione definitiva in memoria. Dopo 
l'inizializzazione la prima parte del 
programma non occorre più. 

Le linee 50-77 installano il patch 
della Ram Disk fra il DOS e i suoi 
buffer, dove non verrà sovrascritto 
dalle variabili o dalle stringhe del- 
l'Applesoft 

Le linee 79-85 fanno un patch nel 
codice della RWTS del DOS alla lo¬ 
cazione $BD0E, di modo che il con¬ 
trollo del programma venga trasferi¬ 
to alla routine della Ram Disk. Le li¬ 
nee 87-88 modificano il DOS in mo¬ 
do che possa immagazzinare i file 
nella traccia $11. 

Le linee 92-97 disabilitano il co¬ 
mando INIT in modo che il DOS 
modificato non possa essere messo 
su un nuovo dischetto. 

La RAM card viene abilitata alla 
scrittura (linee 99-131) e la VTOC 
della Ram Disk (linee 138-156) vie¬ 
ne posta sulla traccia $11, settore $0 
della Ram Disk, locazioni da $D000 


a $D0FF nel banco 2 della memoria 
a commutazione di banco. 

I settori da $1 a $3 della traccia 
$11 ($D100-$D3FF) della Ram Di¬ 
sk provvedono a riservare uno spa¬ 
zio per un massimo di 21 File. 

Infine le ROM della scheda madre 
dellApple vengono abilitate e il pro¬ 
gramma di allestimento termina (li¬ 
nee 133-134). 

• Patch. Una volta installato il 
patch della Ram Disk, il codice della 
RWTS del DOS a $BD0E controlla 
se sia stato chiesto lo slot 5. In caso 
negativo il controllo viene ripassato 
al normale codice RWTS del DOS 
(linee 160-171). 

Le linee 173-202 salvano il nume¬ 
ro di drive della Ram Disk e il nume¬ 
ro di volume nello IOB, e controlla¬ 
no se ci siano numeri di traccia vali¬ 
di ($1, $2, $3 e $11). I numeri di 
traccia non validi danno al DOS una 
condizione di READ ERROR (erro¬ 
re di lettura). Per semplificare certi 
calcoli successivi la traccia $11 è 


Il mensile con disco programmi 
per personal computer 

Ibm, Olivetti e compatibili. 

Prenotalo presso la tua edicola di fiducia. Costa solo 15.000 lire. 
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AppleDisk 

Il mensile con disco programmi per Apple II, Ile, Ile, Europlus. 
Prenotalo presso la tua edicola di fiducia. Costa solo 15.000 lire. ^ 

















convertita in $0 a linea 197. 

Le linee 204-223 convertono la 
combinazione di traccia/settore che è 
stata richiesta in un indirizzo e in un 
banco della memoria a commutazio¬ 
ne di banco. 

Poi la memoria a commutazione 
di banco viene abilitata alla lettu¬ 
ra/scrittura, il codice del comando 
contenuto nella IOB viene controlla¬ 
to e viene intrapresa l'azione corri¬ 
spondente (linee 225-252). 

Infine, nelle linee 254-269, un co¬ 
dice di stato d'errore viene salvato 
nella IOB, la memoria a commuta¬ 
zione di banco viene disattivata e 
vengono ripristinate le ROM del- 
l'Applesoft e del Monitor. 

• FID. Il FID è compatibile con 
la RamDisk, con l'eccezione che la 
selezione 2 del menù, Space on Di¬ 
sk (spazio sul dischetto), fornisce da¬ 
ti errati. Il valore dei settori utilizza¬ 
ti è sempre troppo alto di 224 setto¬ 
ri, pur essendo esatto il valore dei 
settori liberi. 


Personalizzazione 

Il programma richiede un Ile, un 
Ile, o un II Plus con scheda 16K nel¬ 
lo slot 0. Potete cambiare il numero 
di slot per la scheda del II Plus cam¬ 
biando il valore assegnato a PHYSL 
nella linea 17 del codice sorgente in 
linguaggio assemblatore. 

Se non usate un assembler dovete 
cambiare i valori esadecimali C082 
e C083 a $2056, $2059, $2095, 
$214D, $2150 e $2186 rispettiva¬ 
mente in C0(8+N)2 e C0(8+N)3, do¬ 
ve N è il numero di slot (fate atten¬ 
zione a introdurli nell'ordine byte 
basso/byte alto). 

Ad esempio per usare una RAM 
card nello slot 2 usate CO Al e 
C0A3. Così facendo potreste carica¬ 
re l'Integer Basic in una scheda nello 
slot 0 e usare un'altra scheda come 
Ram Disk. 

Il programma com'è attualmente ri¬ 
chiede che specifichiate lo slot 5. 
Per cambiare il numero di slot dove¬ 
te cambiare il valore assegnato a 
LOGSL a linea 16, o cambiare il va- 


ATTENZIONE! 

Il listato è 
pubblicato alle 
pagine 107-109 



lore esadecimale, 50, a $205E e 
$20EF in NO, dove N è il numero di 
slot. 


Se avete esperienza di programma¬ 
zione in linguaggio assemblatore po¬ 
tete rilocare, volendo, il patch della 
Ram Disk in qualche punto che non 
sia compreso fra il DOS e i suoi buf¬ 
fer. Questa modifica dovrebbe porre 
pochi problemi, in quanto la routine 
è rilocabile e usa solo locazioni di 
pagina zero che sono assegnate a 
RWTS. 

^ Questo programma è disponibile ^ 
su dischetto. L’elenco, i prezzi 
e le modalità d’ordine di questo 
e degli altri dischetti disponibili 
sono riportati nella rubrica 
i Disk Service. 
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Per disegni veloci, e soprattutto per lavori a piena pagina, MacPaint 
mostra il fianco. Effetti ombra, retini, uso del carboncino, sguardo 
d'insieme, sono invece le caratteristiche di Painter. Ma non occorre 
scegliere tra i due: i documenti sono esportabili in entrambe le direzioni. 


Un pennello 
in libertà 


MacPaint è un programma quasi 
perfetto e la sua eleganza e semplici¬ 
tà ne hanno fatto un favorito fin dal¬ 
la sua presentazione nel 1983. Ma 
non è perfetto. Provate ad usarlo 
per fare uno schizzo veloce. Il risul¬ 
tato assomiglia veramente a un dise¬ 
gno? Probabilmente no. Le linee so¬ 
no troppo uniformi e precise. Si ve¬ 
de che sono generate da un computer 
e non da un vero pennello. 

Invece con il programma Painter 
potete ottenere l'effetto e la sensazio¬ 
ne di reali colpi di pennello. Painter 
possiede tre strumenti, cinque retini 
e tre differenti dimensioni del pennel¬ 
lo. I tre strumenti sono: la simula¬ 
zione di un carboncino, un pennello 
che varia in continuazione il traccia¬ 
mento del motivo e un pennello in¬ 


vertitore che cambia in continuazio¬ 
ne il suo effetto man mano che ripas¬ 
sate sulla stessa area. 

Questi strumenti vi permettono di 
crearedeglieffetticompletamentedif- 
ferenti da quelli che ottenete con 
MacPaint o con qualunque altro pro¬ 
gramma di disegno. 

Come si usa il programma 

Per usare Painter, selezionate Start 
dal menù Run. Una finestra vuota 
riempie lo schermo e due menù com¬ 
paiono nella parte superiore. Si può 
provare subito Painter facendo clic e 
muovendo il mouse alfintemo della 
finestra, così come fareste con il pen¬ 
nello di MacPaint. Lo strumento 
che state usando è il carboncino che 
produce una traccia irregolare. Per 


provare gli altri strumenti, aprite il 
menù Opzioni e selezionate Motivo 
oppure Inversione. Provate questi 
strumenti in modo simile a come a- 
vete fatto con il Carboncino. 

Potete anche cambiare il motivo 
con il quale disegnare (a eccezione di 
quando state usando Motivo) e la di¬ 
mensione del pennello (escluso 
quando si usa il Carboncino) con 
l'appropriata selezione dal menù Pen¬ 
na. 

Per salvare scegliete Registra dal 
menù Archivio e, come al solito, 
per richiamare il file selezionate la 
funzione Apri. Per stampare una co¬ 
pia su carta con la stampante usate 
la funzione Stampa. 

La selezione di una voce dal menù 
Regolazioni vi permette di cambia- 
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Macintosh II. Niente è più forte 
di un’idea che si sviluppa. 



Macintosh™ II rappresenta quanto di più 
ecnologicamente avanzato la ricerca Apple™ 
ha prodotto nel campo del personal computer. 

Massima potenza, architettura aperta ed 
estrema velocità sono le “nuove frontiere” di 
un computer che non ha posto limiti alle 
sue potenzialità d’uso. 

Infatti Macintosh II è già pronto a 
sfruttare ogni nuova opportunità tecnologica: 
i 6 slots d’espansione e i 3 sistemi operativi 
di cui è possibile usufruire (Macintosh, MS- 
DOS e Unix), lo rendono utilizzabile per la 


più vasta gamma di applicazioni. Stand alone 
o collegato in rete locale AppleTalk™ o 
Ethernet, Macintosh II è adattabile a qualsiasi 
esigenza di elaborazione e di collegamento 
sia con altre stazioni di lavoro che con 
mainframes. 

Macintosh II è basato sulla più moderna 
gamma di microprocessori, 68020 a 32 bit e 
coprocessore matematico 68881, che gli 
permettono di raggiungere velocità di 
esecuzione fino ad ora impensabili per un 
personal computer. Si propone con dischi 


rigidi interni ed esterni da 40 o 80 Mb e con 
monitor a colori da 13” o da 12” in bianco e 
nero, ad altissima risoluzione grafica. 

Macintosh II mantiene i vantaggi esclusivi 
di tutti i computer Apple: l’uso colloquiale e 
immediato, oltre ad un’interfaccia omogenea 
per tutte le applicazioni. 


m, Apple Computer 


Apple, il marchio Apple, Macintosh, AppleTalk sono marchi di Apple Computer Ine. MS-DOS è un marchio registrato di Microsoft Corporation. Ethernet è un 
marchio registrato di Xerox Corporation. Unix è un marchio di AT&T Information Systems. 









































re i valori che il programma usa per 
determinare la forma e i retini dei dif¬ 
ferenti pennelli. Quando selezionate 
dal menù Regolazioni appare una fi¬ 
nestra di dialogo che contiene i valo¬ 
ri che Painter usa per controllare il 
tipo di linea disegnata dai pennelli. 
La selezione di Variabili Carboncino 
vi permette di alterare i valori mini¬ 
mi e massimi di larghezza e altezza 
che verranno usati dal pennello. La 
selezione di Motivi permette di sce¬ 
gliere tra cinque valori di densità che 
il pennello può usare. E infine, l'op¬ 
zione Dimensioni Penna permette di 
modificare le dimensioni di default 
dei pennelli piccolo, medio e largo. 

Anche se imparare a lavorare con 
Paint è piuttosto semplice, lo sfrut¬ 
tamento completo delle sue possibi¬ 
lità può richiedere un certo tempo. 
Qui diamo alcuni suggerimenti per 
usarlo al meglio. Quando usate Pain¬ 
ter cercate di non prestare molta at¬ 
tenzione ai dettagli: per quelli, va 
benissimo MacPaint. Invece usate 
Paint per lavorare sulla pagina nel 
suo complesso. Cercate di lavorare 
sulla composizione del disegno e su¬ 
gli effetti ottici delle luci e delle om¬ 
bre. Usate il Carboncino per anneri¬ 
re, come nelle ombre, o per schiari¬ 
re. I Retini dovrebbero essere usati 
quando desiderate mostrare l'anda¬ 
mento dell’oggetto oppure la sua 
consistenza. Usate pennellate che 
scorrono nella stessa direzione del 
movimento nel disegno. 

Lo strumento dell'Inversione è 
forse il più difficile da padroneggia¬ 
re, ma può essere utilizzato per crea¬ 
re degli effetti insoliti. Si può simu¬ 
lare un vetro rotto disegnando nella 
stessa area con pennellate in direzio¬ 
ni diverse. L'impressione di superi¬ 
ci irregolari può essere resa con pen¬ 
nellate di differenti dimensioni. Infi¬ 
ne si può ripassare con il Carbonci¬ 
no per aggiungere ombre e luci più 
definite. Non dimenticate di provare 
tutti gli effetti, retini e dimensioni 
del pennello in differenti combinazio¬ 
ni: potreste arrivare a degli interes¬ 
santi risultati. 

Se si limitano le dimensioni del 
Carboncino o si cancellano dei moti¬ 
vi dai Retini, si possono creare pen¬ 
nelli che lavorano similmente a quel¬ 
li di MacPaint. 

Per esempio, regolando le dimen¬ 
sioni minima e massima del Carbon¬ 
cino allo stesso valore si ottiene di 
disegnare con un tratto di forma co¬ 
stante. 



Creazione di documenti 
MacPaint 

Se desiderate creare un disegno che 
possa essere utilizzato direttamente 
da MacPaint, usate la combinazione 
Maiuscole-Comando-3. Quando pre¬ 
mete questi tasti, il Mac salva su di¬ 
sco l’intero contenuto dello schermo 
come file MacPaint con il nome 
Screen 0. MacPaint può richiamare 
questo file e si può farne l'editing e 
salvarlo come ogni altro file Mac¬ 
Paint. Potete salvare l'intero disegno 
negli Appunti selezionando l’opzio¬ 
ne Salva negli Appunti dal menù Ar¬ 
chivio; quindi uscite da Painter, fate 
partire MacPaint (oppure FullPaint 
o qualche altro programma grafico) e 
selezionate Paste dal menù Edit per 
avere il trasferimento del disegno. 

Come funziona 
il programma 

Per introdurre il programma usate 
l'MS Basic versione 2.0 (binaria) o 
superiore e copiate il listato 1. 
Chi possiede il Macintosh Plus do¬ 
vrebbe usare la versione 2.1 o supe¬ 
riore. 

Salvate il programma come "Pain¬ 
ter". Per un aiuto nell'introduzione 
del listato, potete vedere la rubrica 
"Per chi comincia su Macintosh" in 
questo numero della rivista. 

Siccome molte delle funzioni del 
programma si trovano già nelle rou¬ 
tine in ROM, non c'è praticamente 
alcuna differenza di velocità tra Pain¬ 
ter e MacPaint, nonostante che Pain¬ 
ter sia scritto interamente in Basic. 
Se poi viene compilato con il nuo¬ 
vo compilatore Microsoft, diventa 
ancora più veloce. 

La routine Painting attende finché 
non viene premuto il bottone del 
mouse. Quando il bottone viene pre¬ 
muto, il comando MoveTo colloca 
la penna nella posizione del mouse. 
Quindi entra in un loop che usa il 
comando LineTo per disegnare una 
linea continua fino al punto dove il 
mouse viene trascinato. All'interno 
di questo loop, Painter effettua un 
Gosub alla subroutine DryBrush o 
alla subroutine Pat.Paint, secondo 
lo strumento selezionato (Inversione 
non necessita di alcuna routine, per¬ 
chè il suo pennello non subisce al¬ 
cun cambiamento). La routine 
DryBrush prende a caso una dimen¬ 
sione di pennello tra quelle specifica¬ 
te nella finestra di dialogo delle Re¬ 
golazioni e la routine Pat.Paint pren¬ 
de, anch’essa a caso, uno dei retini 

■i 


ATTENZIONE! 

Il listato è 
pubblicato alle 
pagine 119-121 


fra quelli selezionati nella finestra di 
dialogo delle Regolazioni. 

Per salvare il disegno, Painter ese¬ 
gue un'istruzione PICTURE ON, 
mette (con PUT) l'immagine a 0,0, 
e deposita i dati in G$. Poi Painter a- 
pre un file su disco con il nome sele¬ 
zionato nella finestra di dialogo di 
Registra come... e vi manda G$. Il 
file viene ribattezzato con il suffisso 
"PNTR" in modo che venga mostra¬ 
to solo come file Painter quando vie¬ 
ne aperto. L'apertura di un file è il 
contrario del suo salvataggio. Dap¬ 
prima il file viene aperto (con O- 
PEN) e G$ viene ricuperato; quindi 
G$ viene disegnato sullo schermo 
con il comando PICTURE, G$ che 

10 colloca nella stessa posizione di 
quando era stato salvato. Anche la 
stampa di un file è molto simile al 
suo salvataggio. Quando viene sele¬ 
zionato Stampa, Painter mette il di¬ 
segno in G$ (come prima) e poi in¬ 
via il file alla stampante. 

Painter può stampare con la Laser¬ 
Writer così come con l’ImageWriter. 
Assicuratevi di avere la LaserWriter 
selezionata prima di comandare la 
stampa. Una riga del programma de¬ 
ve essere modificata: cambiate PIC- 
TURE(70,175),G$ in PICTU- 
RE(50,175),G$ per avere il disegno 
centrato nella pagina. 

Il programma è molto flessibile. 
Se vi viene in mente un'altra idea 
per il pennello, ecco come dovete fa¬ 
re per aggiungerlo al programma: 

1. Inserite il suo nome nel menù Op¬ 
zioni. 

2. Create una routine di inizializza- 
zione che la routine MenuFix possa 
chiamare; etichettatela ”{brush}.l". 

3. Create (se necessario) una routine 
di aggiornamento che venga richia¬ 
mata dall'interno di PaintLoop con 

11 nome del pennello come etichetta. 
Questa routine dovrebbe contenere o- 
gni regolazione necessaria per il pen¬ 
nello. 

f Questo programma è disponibile ^ 
su dischetto. L’elenco, i prezzi 
e le modalità d’ordine di questo 
e degli altri dischetti disponibili 
sono riportati nella rubrica 
V Disk Service. , 
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CRICKET DRAW 


È un programma di disegno 
rivoluzionario che trasforma il 
Macintosh in uno strumento di 
layoro grafico professionale. 

È object oriented, si ha così 
il massimo della flessibilità dal 
punto di vista del disegno e 
della risoluzione di stampa. 

A disposizione ci sono un 
gran numero di strumenti nuo¬ 
vi, quali la possibilità di gestire 
una scala di grigi che va da 0 
a 100%, sfumate, stelle, griglie, 
griglie logaritmiche e curve di 
Bezier. 

La gestione dei testi in Cric¬ 
ket Draw è parte integrante 
dell'ambiente di disegno. Li¬ 
na volta scritto, il testo può es¬ 
sere gestito come un qualun¬ 
que altro oggetto, permetten¬ 
do una gran quantità di mani¬ 
polazioni e di effetti speciali. 
Volete ombreggiare il testo, 
disporlo lungo una linea, ruo¬ 
tarlo, inclinarlo, produrre effetti 
prospettici... con Cricket Draw 
è facile, 




Un generatore di codici PostScript 

PostScript è il linguaggio per la definizione della pagina che è 
stato assunto come standard nel desk top publishing. Per ottene¬ 
re effetti speciali sofisticati su una stampante Laser è necessario 
conoscere il PostScript, a meno che non si usi Cricket Draw, Cric¬ 
ket Draw è Infatti un generatore di codice PostScript che fa tutto il 
lavoro automaticamente. 

Cricket Draw può diventare un PostScript Editor che permette 
di cambiare e di intervenire direttamente sul codice PostScript in 
precedenza definito in maniera "trasparente" con l'editor grafi¬ 
co. 


Prestazioni incredibili 

• Rotazione libera, inclinazione e riflessione di tutti gli oggetti • Om¬ 
breggiatura automatica controllata • Sfumature con una scala di 
grigi da 0 a 100% con incrementi di 1% • Fontane (più sfumature 
graduate) • Più tipi di caratteri con diversi stili entro lo stesso bloc¬ 
co di testo • Il testo può venire disposto lungo una linea qualun¬ 
que • Griglie e linee guida permettono l'allineamento automati¬ 
co • Effetti speciali per il testo (rotazioni, ombreggiature, inclinazio¬ 
ni, retinature ecc.) • Potenti e semplici comandi per l'editing degli 
oggetti • Righelli orizzontali e verticali e misure in pollici, millimetri, 
pica o pixel • Possibilità di definire lo spessore delle linee in incre¬ 
menti di 0,05 • Possibilità di lavorare in ingrandimento o riduzione ♦ 
Gestione dei colori nella definizione del disegno (stampa a colo¬ 
ri sulla Image Writer II). 


Distribuito in esclusiva da: 

Corso Italia 149-34170 Gorizia - Telefono 0481 /30909 - 32790 



Disponìbile negli Apple Center o per corrispondenza 

in versione italiana 


Configurazione: 

Macintosh 512/800, Plus, SE, II. 


Prezzo: 
580,000 lire + iva. 


































Si tratti di un solo stabile, o di più condomini, questa applicazione verticale 
del celebre database programmabile consente di affrontare con 
agilità una gestione amministrativa altrimenti complessa e irta di tranelli. 


Tutti i conti 
del condominio 


Il programma Millesimi è un'ap¬ 
plicazione verticale, sviluppata con 
Omnis3 Plus, e capace di risolvere 
le problematiche della gestione am¬ 
ministrativa di uno o più condomi¬ 
ni; l'applicazione consente di operare 
su di un condominio alla volta, pas¬ 
sando con facilità da un archivio a 
un altro. 

Millesimi permette di sfruttare in 
modo ottimale la particolare interfac¬ 
cia grafica di Macintosh, attraverso 
l'uso del mouse, dei menù pull- 
down, delle finestre di dialogo, dei 
pulsanti e dei bottoni, che rendono 
il programma molto facile e piacevo¬ 
le da utilizzare. 

Ovviamente per usare Millesimi è 
necessario avere familiarità con il 
modo di operare di Macintosh e quin¬ 
di possedere le nozioni basilari sul¬ 
l’uso del mouse e della tastiera, sul 
modo in cui va selezionata un'icona, 
vanno attivati i comandi presenti nel¬ 
le barre dei menù o va selezionata la 
stampa su una qualsiasi stampante 
collegata. 


Confezione e manuale d’uso 

L'applicazione è confezionata in 
un pacchetto, dal look gradevole e ra¬ 
zionale, contenente un dischetto con 
l'applicazione e un manuale d'uso in 
italiano molto chiaro. 

Per quanto riguarda il manuale, es¬ 
so è strutturato in tre parti fondamen¬ 
tali: 

• la prima, intitolata "Che cos'è Mil¬ 
lesimi", contiene la descrizione delle 
caratteristiche generali dell'applica¬ 
zione e le informazioni su come ef¬ 
fettuare una corretta installazione del¬ 
la stessa; 

• la seconda, intitolata "Come si uti¬ 
lizza Millesimi", descrive le avver¬ 
tenze e le modalità operative da se¬ 
guire per costruire e gestire corretta- 
mente la contabilità di uno o più 
condomini; 

• la terza e ultima parte del manuale, 
intitolata "Sezione di Riferimento", 
contiene la spiegazione dettagliata 
dei menù, delle funzioni, dei coman¬ 
di, delle finestre di dialogo, dei pul¬ 
santi, dei messaggi e delle stampe re¬ 


alizzabili durante l'uso del program¬ 
ma Millesimi. 

Come funziona il programma 

Il dischetto contiene l'applicazione 
e il font Monaco modificato, che de¬ 
ve essere installato nel System del 
Macintosh con il Font/DA Mover 
(un programma contenuto nel Disco 
Sistema che si trova in ogni confe¬ 
zione di Macintosh). 

Come già detto, Millesimi è un'ap¬ 
plicazione sviluppata con Omnis3 
Plus per consentire una gestione con¬ 
tabile di uno o più condomini ai cui 
dati si accede alternativamente. I dati 
di un certo condominio sono registra¬ 
ti in un unico archivio le cui dimen¬ 
sioni dipendono esclusivamente dal 
supporto di memorizzazione utilizza¬ 
to (un condominio di notevoli di¬ 
mensioni rimane comunque al di sot¬ 
to degli 800 Kb di un dischetto dop¬ 
pia faccia). 

Con Millesimi quindi non c'è limi¬ 
te al numero di unità immobiliari 
che si possono trattare o di spese 
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Nome Condominio 


Indirizzo 

: GIR ROnP 1 

Località 

: 19180 TORINO 

Codice Fiscale 

: 1231567890! 

N. Scale 

: 1 


Figura 1. 
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Figura 2. 
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i Scadenze rateali 


Scadenze rateali 

1° 

01/01/87 

2° 

28/02/87 

3* 
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1 1 

5® 


6° 
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9® 
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Figura 3. 
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Figura 4. 



Figura 5. 



che si possono associare a un condo¬ 
minio, a condizione ovviamente che 
il supporto usato per la registrazione 
dei dati lo consenta. 

Millesimi prevede la creazione di 
un archivio, per singolo condomi¬ 
nio, con le seguenti informazioni: 

• per ogni singola unità sono defini¬ 
bili i dati anagrafici e intestatari, e i 
parametri di ripartizione di spesa di 
singole unità secondo le tabelle mil- 
lesimali (figura 1); 

• si possono definire fino a 9 tabelle 
millesimali (figura 2), ciascuna 
delle quali può essere usata come cri¬ 
terio di ripartizione delle spese (il ter¬ 
mine "millesimali" è limitativo, nel 
senso che le tabelle possono avere 
totali anche diversi da 1000, ma vie¬ 
ne usato per comodità); inoltre le ta¬ 
belle possono essere diverse da con¬ 
dominio a condominio; 

• l’applicazione permette di definire 
fino a 9 date diverse di scadenza per i 
versamenti delle rate in acconto (fi¬ 
gura 3). Anche in questo caso si 
possono avere quindi scadenze diffe¬ 
renziate da un condominio a un al¬ 
tro, con l’ovvia possibilità di modifi¬ 
carle di gestione in gestione; 

• possono essere registrate tutte le 
spese sostenute durante una gestione 
contabile (figura 4) con indicazio¬ 
ne degli importi, delle date, delle ta¬ 
belle millesimali e delle scale, secon¬ 
do le quali dovranno essere ripartite 
a fine gestione per effettuare il Bilan¬ 
cio Consuntivo: questa parte dell’ar¬ 
chivio viene azzerata all’inizio di u- 
na nuova gestione tramite un apposi¬ 
to comando; 

• è offerta la gestione dei versamenti 
in acconto effettuati dai condomini 
durante una gestione contabile per il 
calcolo degli acconti sul Bilancio 
Consuntivo (figura 5), e anche que¬ 
sta parte dell’archivio viene azzerata 
all'inizio di una nuova gestione tra¬ 
mite un apposito comando; 

• è possibile addebitare a ogni singo¬ 
la unità immobiliare determinate spe¬ 
se sostenute dalfamministrazione 
per suo conto, come ad esempio inte¬ 
ressi passivi, spese particolari, ecc. 

Stampa di documenti 

L'applicazione Millesimi permette 
di effettuare il calcolo e la stampa 
dei seguenti documenti per ogni sin¬ 
golo condominio: 

• Anagrafe, che contiene le infor¬ 
mazioni sulle proprietà immobiliari 
in cui è diviso il condominio; 

• Millesimi, che riepiloga le uni- 


68 

























































































































tà immobiliari riportando i parame¬ 
tri di ripartizione delle spese, con to¬ 
tali di scala e totali generali; 

• Etichette, che effettua la stampa 
in formato etichette degli indirizzi 
dei condomini; 

• Spese, che elenca le spese soste¬ 
nute dairamministratore durante la 
corrente gestione, suddivise per cate¬ 
gorie; 

• Versamenti, che elenca tutti i 
versamenti eseguiti dai condomini 
durante la gestione in corso; 

• Tabulato Rate, che contiene 
per ogni condomino la sigla d’identi¬ 
ficazione, il nominativo, l'importo 
delle rate versate e l’eventuale resi¬ 
duo precedente; 

• Solleciti di Pagamento, che 

effettua lettere personSizzate con sol¬ 
leciti di pagamento ai condomini 
morosi; 

• Bilancio Consuntivo, che e- 
lenca le spese secondo le tabelle mil- 
lesimali calcolandone i totali e l'e¬ 
ventuale ripartizione in scale; 

• Riparto Consuntivo (figura 

6) , che elenca per ogni unità immo¬ 
biliare le quote di spesa suddivise 
per categorie, gli acconti e i saldi; 

• Riparto Preventivo (figura 

7) , che elenca all'inizio di una nuo¬ 
va gestione per ogni unità immobi¬ 
liare le quote previste di spesa suddi¬ 
vise per categorie, i residui e le rate. 

Millesimi permette inoltre di regi¬ 
strare la stampa di documenti su di¬ 
sco, in formato Solo Testo, renden¬ 
doli utilizzabili anche da altre appli¬ 
cazioni Macintosh per tasformarle in 
tabelle (gestibili con Excel) o docu¬ 
menti (gestibili con word proces¬ 
sor). 

Con questi programmi si possono 
dunque ritoccare i documenti stampa¬ 
ti su disco da Millesimi, per dare lo¬ 
ro una personalizzazione grafica spe¬ 
cifica, oppure per effettuare le stam¬ 
pe su LaserWriter. 

Invece, per consentire l'uso della 
stampante ImageWriter II, le stampe 
particolarmente complesse sono sta¬ 
te compattate o distribuite su due pa¬ 
gine, come nel caso delle stampe dei 
riparti consuntivi o preventivi pro¬ 
dotte in due fogli separati da affianca¬ 
re durante l'uso. 

Archivio e configurazione 

Tutte le operazioni contabili di 
un’amministrazione condominiale, 
come il calcolo delle diverse rate di 
pagamento, il bilancio consuntivo, 
il riparto preventivo, il riparto con- 


^INFORMAZIONI. 

^aziendali 


Viaggiare negli States 
quest'estate costa meno 

Dall'esclusivo Manhattan, alla deliziosa baia di San 
Francisco, da una vacanza ai Caraibi o in Polinesia a un 
soggiorno in un ranch della California, o, ancora, a una 
vacanza coast to coast in tenda e in pullman, 

Il nuovo catalogo "L'America della TWA" realizzato 
dall'operatore Gastaldi Tours con la collaborazione del¬ 
la compagnia aerea statunitense, offre quest'anno 84 
pagine di proposte e combinazioni per organizzare la 
propria vacanza su misura negli Stati Uniti. 

In un paese grande 31 volte la nostra penisola le possi¬ 
bilità sono infinite e non rimane che scegliere tra le gran¬ 
di metropoli che in uno scintillio di metallo e vetro hanno 
conquistato i propri spazi arrampicandosi verso l'alto, e 
gli spazi sconfinati che si aprono appena fuori dalle gran¬ 
di città: i profondi canyons, la sabbia del deserto, la fitta 
vegetazione dei parchi nazionali, le lunghissime spiag¬ 
ge dove l'estate dura tutto l'anno, le enormi pianure o i 
grandi laghi. Senza dimenticare le splendide oasi natu¬ 
rali come le Hawaii, i Caraibi o la Polinesia, dove, al sole 
di queste isole dei mari del sud, è possibile praticare nu¬ 
merosi sport acquatici oltre la possibilità di noleggiare 
barche a vela e yacht per vivere la magica atmosfera 
dei Mari del Sud, 

Ma la novità più rilevante del nuovo catalogo L'Ameri¬ 
ca delia Twa riguarda le quote di partecipazione, che 
grazie ai numerosi ribassi subiti dal dollaro, sono state in 
molti casi ridotte fino al 5% rispetto alle stesse tariffe del¬ 
l'anno scorso: una settimana a New York all'inizio della 
stagione estiva parte da L, 1,583,000 in hotel di seconda 
categoria inclu¬ 
so volo TWA da 
Milano, mentre le 
grandi città USA 
offrono soggiorni 
a partire da L, 

30.000 per notte. 

Sempre per 
quanto riguarda 
le novità due ori¬ 
ginali giri del mon¬ 
do: di 18 e 20 gior¬ 
ni, con accom¬ 
pagnatore dall'I¬ 
talia, attraversa¬ 
no Stati Uniti, Au¬ 
stralia, Polinesia 
ed Estremo Orien¬ 
te con prezzi da 
L. 5,763.000. 

Il programmo A- 
merica della 
TWA è valido fi¬ 
no al 31 marzo 
1988 ed è distribui¬ 
to in tutte le agen¬ 
zie di viaggio. 



TWA 
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Figura 6. 
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Figura 7. 


Questi i rivenditori 

Abc Informatica, C.à Porta Padova 19, Vicenza 
All'Informatica Bergamo, V. Stoppani 4b, Bergamo 

Bit Computers, V. C. Perrier 4, Roma (e tutti gli altri punti vendita Bit Computers) 

C.E. Communications Engineering P. Firenze 4, Milano 

Comput-Able Srl-Microage, C.so Corsica 19, Torino 

Computeam, V. Vecellio 41, Lissone 

Computer Area, V. Carducci 2, Villasanta 

Computer Service, V. Cavallotti 12, Rovigo 

Computer Shop, V. Vittorio Emanuele II 66r, Firenze 

Consortium Thema Informatica Distribuita Sas V. e. Emanuele IH 20, Cuneo 

Deltron, V.le Gran Sasso 50, Milano 

Easy Byte, V.le Oceano Pacifico 66, Roma 

Edp Sistemi, V.le Pietramellara 61f, Bologna 

G.L.M. Informatica, V. De Nava 98, Reggio Calabria 

I.C.C. Elettronica, V. degli Imbimbo 126, Avellino 

D computer, V. Solferino 5, Brescia 

Iret, V. Emilia S. Stefano 32, Reggio Emilia 

Iipe, V. dei Carantani 1, Varese 

La Barbera Carlo, V. Toledo 320, Napoli 

MOS 80 Personal Computers, L.go Marzabotto 21, Verona 

PC Personal Computeras, V. Chiapponi 42, Piacenza 

Personal Computer Shop, V. L. da Vinci 36, Trezzano sul Naviglio (MI) 

S.P.A., V. Canobbio 16a, Novara 
Sals Informatica, V. G. DAnnunzio 2/35, Genova 
SI.EL. Informatica, P.za Gaitea 2, Catania 
Sistel Computers, V. Colombo 26, Caserta. 



suntivo, sono gestite in modo auto¬ 
matico dall'applicazione e sono effet¬ 
tuabili in qualsiasi momento. L'azze¬ 
ramento e la chiusura della gestione 
contabile in corso, con la conseguen¬ 
te cancellazione delle voci di spesa 
generali e degli addebiti relativi ai 
singoli inquilini, annulla automatica- 
mente per ogni unità immobiliare 
gli importi dei versamenti e riporta 
in automatico i saldi finali al posto 
dei residui iniziali. 

Infine per quanto concerne le confi¬ 
gurazioni hardware tradizionali (ad e- 
sempio Macintosh Plus con due uni¬ 
tà a dischetti o con disco rigido) le 
modalità di installazione dell'applica¬ 
zione Millesimi tengono conto della 
presenza di due unità floppy da 800 
Kb o di un disco rigido in alternati¬ 
va. 

Per poter utilizzare l’applicazione 
con unità a disco da 3,5" da 800 Kb 
si deve predisporre un disco Sistema 
contenente: 

• Cartella Sistema con System (ver¬ 
sione 3.2 o successive), Finder (ver- 
s. 5.3 o successive), ImageWriter, 
LaserPrep, LaserWriter; 

• Omnis3 Plus in versione completa 
oppure il solo RunTime, con il file 
Omnis3 Plus.Info; 

• l'applicazione Millesimi, contenu¬ 
ta nel dischetto della confezione. 

Dopo avere eseguito tutte queste o- 
perazioni, l'utente ha a disposizione 
un disco d'avvio che contiene tutti 
gli elementi necessari per un corret¬ 
to funzionamento; è consigliabile fa¬ 
re una copia di riserva di questo di¬ 
schetto e non utilizzare mai i dischi 
originali per lavorare. 

Gli archivi dei dati relativi ai con¬ 
domini possono essere registrati su 
altri dischi a discrezione dell'utente, 
con l'accortezza di usare nomi signi¬ 
ficativi sia per i dischi sia per gli ar¬ 
chivi. 

E' sicuramente buona abitudine ef¬ 
fettuare copie di sicurezza degli archi¬ 
vi dopo una sessione di lavoro, per 
tutelarsi dai rischi di perdite di dati; 
tale operazione protegge l'utente sia 
da eventuali guasti che dovessero ve¬ 
rificarsi ai dispositivi di memorizza¬ 
zione, sia da errori commessi nel 
trattamento dei dati. 

Il pacchetto Millesimi è disponibi¬ 
le al costo di L. 800.000 +Iva pres¬ 
so i rivenditori Apple elencati nel ri¬ 
quadro qui accanto, ai quali potete ri¬ 
volgervi per chiedere maggiori infor¬ 
mazioni. 

Alfonso Scoppetta 




70 



















































Un milione 
per il tuo software 

Si, hai letto bene. Applicando compensa fino ad un milione 
di lire il software dei lettori. Naturalmente il materiale deve pervenire 
alla nostra rivista secondo standard ben precisi: 


• deve essere corredato del listato su carta; 

• deve essere accompagnato dal dischetto; 

• il programma deve essere scritto in modo professionale (niente righe inutili) 
come pure professionale deve apparire rimpaginazione e la grafica delle videate; 


• il tutto deve essere accompagnato da una esauriente spiegazione tecnica di 
come gira il programma, almeno nelle sue parti principali, e di un articolo che ne 
spieghi il funzionamento e fornisca le necessarie istruzioni per un giusto impiego. 



Fra tutti coloro che 
invieranno il loro software 
seguendo queste precise 
modalità, Applicando 
sciegiierà quelli da pubblicare. 
Invierà in tal caso agli autori 
un regolare contratto che, oltre alle 
consuete clausole, riporterà 
l'indicazione del compenso. 
Detto compenso può arrivare fino a 
un milione di lire, a seconda del grado 
di comp|essità e di professionalità 
con cui il programma è stato redatto. 




inTiriiiwir' 

II31 maggio si chiudono i bilanci. Ma qual è la reale situazione 
di una società? Cosa si nasconde dietro un utile di diversi milioni 
di lire? Per chi vuole scavare dentro la gestione finanziaria 
di un'azienda ecco un semplice ma efficace sistema 
di riclassificazione dedicato a chi di partita doppia non sa proprio nulla. 

Bilanci: 

l’ora della verità 

Da tanto si parla dell'entrata in vi¬ 
gore della IV normativa CEE, che fi¬ 
nalmente libererà i bilanci dai vinco¬ 
li legali e fiscali che in questo mo¬ 
mento inquinano i reali dati azienda¬ 
li. 

Nel numero 31, novembre 86, ci 
siamo già occupati della analisi dei 
bilanci aziendali in maniera partico¬ 
larmente approfondita. Tuttavia le 
soluzioni proposte si rivolgevano a 
coloro che hanno una certa dimesti¬ 
chezza con questo tipo di analisi. In 
questo numero invece desideriamo ri¬ 
volgerci a chi non possiede alcuna 
conoscenza specifica in materia ma 
desidera capire come utilizzare que¬ 
sto strumento, che permette di ana¬ 
lizzare proficuamente il bilancio di u- 
na società. 

Comprendere il significato di un 
bilancio è molto utile, per non dire 
indispensabile, per chi investe, o de¬ 
sidera farlo, in Borsa: solo con que¬ 
sto strumento è possibile capire qual 
è la situazione attuale e quale potreb¬ 
be essere la situazione futura. 

E' molto facile ottenere il bilancio 
di una azienda quotata in borsa, ba¬ 
sta procurarsi l'indirizzo della società 
e scrivere una breve lettera richieden¬ 
do l'ultimo bilancio annuale. Riceve¬ 
rete al vostro recapito un volumetto 
in molti casi veramente bello e ben 
realizzato anche dal punto di vista e- 
stetico. 

Alcune società hanno capito infat¬ 
ti l'importanza della presentazione 
del loro bilancio annuale e pubblica¬ 
no piccoli capolavori dall'aspetto ve¬ 
ramente affascinante e coerente alla 
loro strategia di comunicazione. 


Che cosa è 
un bilancio aziendale 

E' uno strumento che permette di 
interpretare lo stato di siute di una 
società. 

Metaforicamente possiamo parago¬ 
narlo a una istantanea che la società 
scatta su se stessa. Questo strumen¬ 
to deve seguire le regole di stesura 
stabilite dal codice civile della nostra 


repubblica e, in un futuro ormai 
prossimo, dovrà adeguarsi ad altre 
normative della Cee che hanno il 
vantaggio di essere ancora più speci¬ 
fiche e precise di quelle attualmente 
vigenti. 

Il nostro obiettivo è conoscere co¬ 
me è nato e come è stato determina¬ 
to il risultato finale. A tal fine si 
procede alla riclassificazione del bi- 


I V I T A 


DISPONIBILITÀ LIQUIDE: 

a) denaro e valori esistenti in cassa 

b) depositi e c/c bancari e postali 

c) titoli di credito a reddito fisso 


2. CREDITI DI FUNZI0NAMENT0: 

a) verso soci per versamenti ancora dovut: 
b.' verso banche 

c) verso società controllanti 

d) verso società controllate 

e) verso società collegate 

f) verso altre società del gruppo 

g) verso le società" concessionarie di pubi 

h) verso clienti 

ì) per contributi dovuti dallo stato 
1) altri crediti 


3. PARTECIPAZIONI: 

a) azioni proprie 

b) azioni in altre società 

c) quote di comproprietà 


. IHM08ILIZZAZIONI MATERIALI 0 TECNICHE: 

a) beni immobili 

b) impianti, macchinari e attrezzature 

c) nobili e dotazioni 

d) automezzi 



16.360.725 
441.721 


IMMOBIL 1ZZAZ10NI IMMATERIALI : 

a) concessioni, marchi di fabbrica e diritti vari 

b) diritti di brevetti industriali 1 

c) diritti di utilizzazione delle opere 

dell'ingegno 

d) avviamento testate t 

e) avviamento altre attività 


6. SCORTE E RIMANENZE: 

a) carta 

b) inchiostri e altre materie prime 

c) materiale vario tipografico 

d) prodotti in corso di lavorazione 

e) prodotti finiti 


■^77-. azione 
altri beni 

f) fondo contributi in conto 

capitale 

g) altri fondi 


1 49.277.450 


4 FONDI AMMORTAMENTO: 

a) di beni immobili 

b) di impianti, macchinari 

e attrezzature 

c) di nobili e dotazioni 

d) di automezzi 

e) di testata 

f) di altre immobilizzazioni 

immateriali 


t 3.632.856 
t 84.315 


5. RATEI E RISCONTI PASSIVI 


E 480.000 
E 514.480 
E 184.247.088 
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lancio seguendo un criterio che vuo¬ 
le ordinare i diversi dati in gruppi o- 
mogenei e seguire precisi criteri 
finanziari che ne facilitano l’interpre¬ 
tazione. Questo perché seguendo le 
leggi attualmente in vigore non sia¬ 
mo in grado di fornire una lettura 
chiara e precisa. 

Il bilancio è composto da due docu¬ 
menti principali: 


• Lo stato patrimoniale, che 

raccoglie le componenti attive e pas¬ 
sive, alla data di chiusura del bilan¬ 
cio, e indica il loro saldo (più noto 
come patrimonio netto). 

• Il conto economico, che indi¬ 
ca, sempre alla data di chiusura del 
bilancio, quali sono stati i ricavi e i 
costi sostenuti. La differenza tra que¬ 
sti due valori indica l'utile o, in caso 
sia di segno negativo, la perdita con¬ 
seguita nell’anno preso in considera¬ 
zione. 


Alcune società forniscono già, ol¬ 
tre al bilancio civilistico, ossia il bi¬ 
lancio conforme alle leggi vigenti 
ma non riclassificato, un bilancio ri¬ 
classificato. Questa maschera è utile 
per analizzare quelle aziende che non 
forniscono un bilancio riclassificato 
o che ne forniscono uno che non si 
adegua al nostro schema di interpreta¬ 
zione. La procedura da seguire sarà 
quindi quella di estrarre dal bilancio 
civilistico i dati necessari per il bi¬ 
lancio riclassificato predisposto sul¬ 
la nostra maschera. 

Stato patrimoniale 
e conto economico 

Analizziamo in breve i due docu¬ 
menti principali partendo dallo stato 
patrimoniale il quale, rispetto al con¬ 
to economico, subisce nella riclassi¬ 
ficazione una minore trasformazio¬ 
ne. La sua lettura ci permette essen¬ 
zialmente di comprendere: 


Inoltre assume particolare impor¬ 
tanza la relazione degli amministrato¬ 
ri in quanto è un documento che si 
propone di fornire chiarimenti e in¬ 
formazioni, sul passato e sul futuro, 
rendendo più agevole il processo di 
comprensione dei dati del bilancio. 


9 ) su peno) e paghe: 
giornalisti 
operai 
i ripiegati 

b) trattamenti integrativi: 
giornalisti 

operai 

impiegati 

c) lavoro straordinario 

ó) contributi previdenziali e assistenziali 

e) altre 


SPESE PER PRESI AZIONI DI SERVIZI: 
a) collaboratori e corrispondenti 
D) agenzia di informazione 

c) lavorazioni presso terzi 

d) trasporti 

e) postali e telegiafiche 

f) telefoniche 

9) fitti e noleggi passivi 
h) diverse 


non dipendenti t 110.575.718 

t 257.957.772 
l 18.500.869 
t 8.198.920 
t 2.836.805 

t 85.488.561 


IMPOSTE e TASSE DELL'ESERCIZIO 


2 087.000 


INTERESSI E ALTRI 'ONERI SU DEBITI OBBLIGAZIONARI 

Interessi sui oebiti: 

^rso banche 

enti previdenziali 
^società controllanti 
^eta controllate 

società del gruppo 



accanto?? 

■>) f ondo ri" 

6) tondo osoif? 

') fondi per tra? 

d) * urico inposte 

e) fundo i ischio svaL 
0 altri fondi 


5.485.607 


1.926.513 

785.000 


a) la misurazione dei valori; 

b) il significato patrimoniale e fi¬ 
nanziario delle varie aree che lo com¬ 
pongono; 

c) il metodo di classificazione e il 
contenuto delle voci. 


Quest'ultimo punto risulta essere 
il più importante. Vediamo il per¬ 
ché. Come abbiamo accennato prece¬ 
dentemente desideriamo riunire in 
gruppi omogenei le varie voci. Il cri¬ 
terio finanziario che utilizzeremo è 
quello dell’ordine crescente o decre¬ 
scente della liquidità. Qual è il signi¬ 
ficato di questi gruppi ? 

Le attività immobilizzate sono 
quelle attività la cui durata di utiliz¬ 
zo o di scadenza è superiore a un an¬ 
no. Le attività correnti invece sono 
le attività liquide o comunque desti¬ 
nate a diventare liquide entro l'anno. 
Un discorso analogo può essere fatto 
per le passività dove riscontriamo le 
passività a medio-lungo termine os¬ 
sia le passività che verranno estinte 
in un periodo superiore a un anno e 
le passività correnti ossia le passivi¬ 
tà che devono essere estinte entro un 
anno. Il patrimonio netto raggruppa 
le componenti del patrimonio netto 
alle quali non può corrispondere una 
parte delle attività o delle passività. 

Vediamo ora di spiegare veloce¬ 
mente quelle voci che possono dare 
adito a qualche dubbio di interpreta¬ 
zione. 

Le immobilizzazioni tecniche com¬ 
prendono i beni materiali che l’azien¬ 


da utilizza per lo svolgimento della 
propria attività. In questo raggruppa¬ 
mento troviamo il fondo ammorta¬ 
mento che non è altro che una quota 
corrispondenteal valore derivantedal- 
l'utilizzo delle immobilizzazioni tec¬ 
niche. 

Le immobilizzazioni immateriali 
invece si possono raggruppare in 
due categorie: i beni o diritti immate¬ 
riali (nel nostro esempio brevetti e 
marchi) e gli oneri pluriennali (per e- 
sempio le spese pubblicitarie o quel¬ 
le in ricerca tecnica). Le immobiliz¬ 
zazioni finanziarie principalmente 
raggruppano gli eventuali possessi 
di azioni di altre società che possono 
essere sia collegate che consociate. I 
ratei e riscontri attivi e passivi sono 
i costi, o i ricavi, già sostenuti ma 
di competenza dell'esercizio futuro 
oppure i costi e i ricavi futuri di 
competenza dell'esercizio preso in e- 
same. La riserva legale è costituita, 
a norma di legge, con utili accanto¬ 
nati che non possono essere distri¬ 
buiti ai soci. Il fondo sovrapprezzo a- 
zioni è costituito, per legge, dal 
maggiore importo rispetto al valore 
nominale che l'azienda ha percepito 
nel caso in cui abbia emesso nuove 
azioni a un prezzo superiore al valo¬ 
re nominale. Il fondo di rivalutazio¬ 
ne monetaria è istituito per tener 
conto degli eventuali effetti inflazio¬ 
nistici. Infine c'è la riserva straordi¬ 
naria, costituita volontariamente 
con utili non distribuiti allo scopo 
di rafforzare la società. 

Sul conto economico la riclassifi¬ 
cazione ha un effetto più sconvolgen¬ 
te in quanto lo schema civilistico 
classifica per natura e non per distri¬ 
buzione, e quindi non consente di co¬ 
noscere le redditività delle diverse fa¬ 
si gestionali. Conseguentemente l'o¬ 
biettivo della riclassificazione è quel¬ 
lo di raggruppare separatamente co¬ 
sti e ricavi a seconda del tipo di ge¬ 
stione in modo da poter conoscere i 
risultati intermedi della gestione stes¬ 
sa. Elementi importanti e forse a 
non tutti proprio chiari sono il co¬ 
sto del venduto che non è altro che 
la somma dei costi di produzione so¬ 
stenuti per conseguire i ricavi.$ 

L'utile lordo è la differenza tra i ri¬ 
cavi e i costi dove per ricavi, lo ri¬ 
cordiamo, intendiamo i ricavi deri¬ 
vanti dall'attività produttiva dell'a¬ 
zienda. L'utile operativo invece è ot¬ 
tenuto dalla differenza tra l'utile lor¬ 
do e le altre spese operative. 

Lo schema del conto economico ri- 
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A 

B 

C 

D 

E 

F 

1 

ATTIVITÀ* 



PATRIMONIO NETTO E PASSIVITÀ* 



2 

Attività immobilizzate 



Patrimonio netto 



3 

Immobilizzazioni tecniche 



Capitale sociale 

25.500 


4 

Terreni 

4.045 


Riserva legale 

2.842 


5 

Fabbricati 

22.270 


Fondo sopraprezzo azioni 

4.030 


6 

Impianti e macchinari 

73.271 


Riserva di rivalutazione monetaria 

11.916 


7 

Altre 

4.748 


Riserva straordinaria 

10.659 


8 

Sottratti: Fondi di ammortamento 

-40.290 


Utile esercizio 1986 

8.150 


9 

Immobilizazioni immateriali 



Totale Patrimonio netto 


63.097 

10 

Brevetti e marchi 

765 





11 

Oneri pluriennali 

720 


Passività a medio e lungo termine 



"l 2 

Immobilizzazioni finanziarie 



Prestito obbligazionario 

2.700 


13 

Partecipazioni 

1.150 


Mutui passivi 

8.820 


1 4 

Altre 

615 


Fondo trattamento di fine rapporto 

29.916 


1 5 

Totale attività immobilizate 


67.294 

Passività a medio e lungo termine 


41 .436 

1 6 

Attività correnti 






1 7 

Giacenze di magazzino 

38.557 


Passività correnti 



1 8 

Titoli 

405 


Prestiti obbligazionari (parte corrente) 

800 


1 9 

Crediti verso: 



Mutui passivi (parte corrente) 

630 


20 

Società controllate e collegate 

2.906 


Debiti vs società collegate e controllate 

1.803 


21 

Clienti 

48.489 


Debiti vs fornitori 

30.548 


22 

Altri 

3.517 


Debiti diversi 

7.540 


23 

Sottratto: Fondo svalutazione crediti 

-1.510 


Banche passive 

18.433 


24 

Banche attive e cassa 

4.806 


Ratei e risconti passivi 

994 


25 

Ratei e risconti attivi 

817 


Totale passività correnti 


60.748 

26 

Totale attività correnti 


97.987 




27 




TOTALE PASSIVITÀ* . 

..> 

102.184 

28 

TOTALE ATTIVITÀ’ . 

.> 

1 65.281 

TOTALE PATRIMONIO NETTO E PASSIVITÀ* 

.> 

165.281 

29 







30 

INDICI 

Reale 

Ideale 




31 

ROl-Redditività del capitale investito 

4,93 

5 

<—Tasso medio del costo del denaro 



32 

ROE-Reddività del capitale proprio 

12,92 

10 

<-Tasso del costo del denaro a breve termine (es. Bot) 

33 

Indipendenza finanziaria 

38,18 

100 

<—Più il valore è vicino a 100 più la società è indipendente 

34 

Liquidità 

0,98 

1,50 

<—Rapporto ideale tra 1 e 2 




Figura 1. 


classificato evidenzierà quindi alcune 
aree di gestione; la prima area è quel¬ 
la della gestione caratteristica e com¬ 
prende: i ricavi, il costo del venduto, 
l'utile lordo, le spese di vendita, le 
spese amministrative e quelle genera¬ 
li e l’utile operativo. L’area successi¬ 


va è quella della gestione finanziaria 
che deve evidenziare quale è stato il 
costo netto della struttura finanzia¬ 
ria. La gestione non caratteristica in¬ 
vece raggruppa proventi e oneri che 
non possono essere inclusi nella ge¬ 
stione caratteristica quali, per esem¬ 


pio, i dividendi dalle partecipazioni. 
La gestione fiscale raccoglie le impo¬ 
ste afferenti il reddito d’esercizio. 

Esiste anche, la gestione straordi¬ 
naria: raggruppa proventi e oneri che 
non traggono origine dalle altre ge¬ 
stioni. 
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A 

B 

C 

1 

RICAVI NETTI 

246.018 

% Sul ricavo netto 

2 

Costo del venduto 



3 

Giacenze iniziali di magazzino 

36.819 

14,97 

4 

Acquisti 

95.408 

38,78 

5 

Lavoro e oneri relativi 

43.123 

17,53 

6 

Ammortamenti industriali 

6.934 

2,82 

7 

Altre spese industriali 

9.698 

3,94 

8 

Giacenza finali magazzini 

-38.557 

-15,67 

9 

Totale costo del venduto 

1 53.425 

62,36 

1 0 

UTILE LORDO 

92.593 

37,64 

1 1 

Altre spese operative 



1 2 

Spese di vendita 

38.621 

15,70 

1 3 

Spese amministrative e generali 

33.720 

13,71 

1 4 

Totale spese operative 

72.341 

29,40 

1 5 

UTILE OPERATIVO 

20.252 

8,23 

1 6 

Proventi e oneri diversi 



1 7 

Proventi finanziari 

785 

0,32 

1 8 

Oneri finanziari 

-6.047 

-2,46 

1 9 

Altri proventi 

1.811 

0,74 

20 

Altri oneri 

-420 

-0,1 7 

21 

Totale proventi e oneri diversi 

-3.871 

-1 .57 

22 

UTILE PRIMA DELLE IMPOSTE 

16.381 

6,66 

23 

Imposte 

8.231 

3,35 

24 

UTILE NETTO 

8.150 

3,31 


Figura 2. 


Gli indici di bilancio 

Aiutano a comprendere ulterior¬ 
mente lo stato di salute dell’impresa 
e possono essere un valido strumen¬ 
to per confrontare due o più società 
o la stessa impresa nell'arco di piu 
anni o ancora per confrontare l’indice 
dell’azienda con l'indice medio del 
settore a cui appartiene. Purtroppo 
però è sempre molto difficile procu¬ 
rarsi un indice medio attendibile del 
settore, per cui l'analisi più valida ri¬ 
mane sempre il confronto tra due o 
più anni in quanto evidenzia la ten¬ 
denza di ogni singolo indice. E' im¬ 
portante ricordare che l’interpretazio¬ 
ne degli indici deve essere adattata a 
ogni diversa situazione: in altre paro¬ 
le non ha molto senso un confronto 
tra indici di una impresa farmaceuti¬ 
ca con una che opera nel settore auto¬ 
mobilistico in quanto vi sono molte¬ 
plici cause ed effetti dei quali, in se¬ 
de di valutazione, è opportuno tenere 
conto. Ecco i più importanti: 

• Il ROI, reddivitità del capitale in¬ 
vestito, misura la redditività median¬ 
te il rapporto Utile operativo/Totale 
attività * 100. Questo indice conside¬ 
ra solo il reddito della gestione carat¬ 
teristica e l'intero capitale investito 
offrendo quindi una buona indicazio- 


Istruzioni spreadsheet 


Le maschere relative alla riclassificazione dello Stato Patrimoniale (figurai) e del Conto Economico 
(figura 2) possono essere impostate su un qualsiasi foglio di calcolo elettronico. Le formule sono mollo sem¬ 
plici. Lo scopo di queste maschere è quello di impostare un criterio di riclassificazione sul quale poter cambia¬ 
re i dati ogni qualvolta si analizzi un bilancio differente. I listati delle istruzioni sono impostati sulla logica di 
inserimento delle formule del programma Excel ma sono traducibili, in alcuni casi senza alcuna variazione, per 
altri spreadsheet come quello di AppleWorks, Multiplan o, ancora, Supercalc. Dopo aver copiato fedelmente tut¬ 
ta la parte testo della maschera nelle relative celle si inseriscono le seguenti formule che rappresentano solo 
somme e sottrazioni. La cella dove andrà inserita la formula è scritta in neretto seguita dal segno di due punti. 


Figura 1. Stato Patrimoniale 
B8: =SOMMA(B4:B 14) 

C26: =SOMMA(B17:B25) 

C28: =C15+C26 

F9: =SOMMA(E3:E8) 

F15: =SOMMA(E12:E14) 

F25: =SOMMA(E18:E24) 

F27: =S0MMA(F11:F25) 

F28: =F27+F9 
B31: =(E8/C28)*100 
B32: =(E8/F9)*100 
B33: =(F9/C28)*100 
B34: =(C26-B17)/F25 


Figura 2. Conto economico 

Bl: il valore dei ricavi netti va inserito ricavandolo dal bilancio 
B9: =SOMMA(B3:B8) 

B10: =B1-B9 

B14: =SOMM A(B 12:B 13) 

B15: =B10-B14 

B21: =S OMM A(B 17 :B20) 

B22: =SE(B21>0;B15-B21;B15+B21) 

B24: =B22-B23 

C3: =(B3*100)/B1 , ^ 

La cella C3 va copiata a fianco di tutte le celle che contengono i valori tenendo come valore fisso Bl mentre 
va aggiornata la cella di riferimento del calcolo. 













































lo applico, 
tu applichi? 

s 

La pubblicità su 
Applicando è informazione. 
Chi legge Applicando 
possiede un computer 
Apple o sta per acquistarlo. 
Oppure sta per cambiarlo 
con un Apple //e. 

O con un Lisa. 

Oppure non lo cambia 
affatto, se lo tiene stretto, 
ma vuol sapere dove, 
come e cosa fa 
veramente per lui. 

Una nuova marca 
di dischetti? 

Una nuova 
Software House? 

Una nuova stampante 
a basso prezzo? 

Per chi applica, 
è importante saperlo. 
Subito. 


Per la pubblicità 

studi'osfera sas 

l rf Strada, 24 

Milano San Felice (Segrate) 

Tel. (02) 75 32 151 

(02) 75 33 939 - 
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sas di Berardo & C. 

1 a Strada 24 - Milano S. Fe 
lice - 20090 Segrate MI - te 
lefono 02/7533939 - 7532151 

P. Iva 07014830157-C.C.I.A.A. 
Milano 1132820 - Tribunale 
Milano Reg. Soc n. 64797 
Banca Popolare di 
Mi lano Ag 17 



ne della solidità e della potenzialità 
reddituale dell'azienda. Il ROI, per da¬ 
re segnali positivi, deve essere equi¬ 
valente al tasso rappresentativo del 
costo medio del denaro. Se il ROI 
supera questo valore l'azienda è reddi¬ 
tualmente sana mentre se è inferiore 
indica che la remunerazione degli in¬ 
teressi passivi riduce la reddività del 
capitale proprio. 

• Il ROE, reddito del capitale pro¬ 
prio, misura la bontà della remunera¬ 
zione dell'investitore mediante il rap¬ 
porto Utile netto/Patrimonio netto * 
100. Un buon dato di paragone è il 
costo del denaro a breve termine sen¬ 
za rischi, per esempio i Bot. Più l'in¬ 
dice è elevato maggiore è la redditivi¬ 
tà dell’azienda. 

• L'indice di indipendenza finanziaria 
evidenzia in che misura l'impresa si 
finanzia con mezzi propri piuttosto 
che di terzi mediante il rapporto Pa- 
tromonio netto/Totale attività * 
100. Tanto più il valore è alto tanto 
più la società è in grado di autofinan- 
ziarsi sottraendosi a finanziamenti e- 
stemi. Il miglior indice di paragone 
in questo caso è quello relativo al¬ 
l'anno precedente in quanto dà imme¬ 
diatamente un'idea dei possibili cam¬ 
biamenti avvenuti. 

• L’indice di liquidità è l’ultimo indi¬ 
ce che analizziamo e misura la capa¬ 
cità di soddisfare l'indebitamento a 
breve; è dato dal rapporto Attività 
correnti - magazzino / Passività cor¬ 
renti. In questo caso un buon indice 
deve tendere a 1 evidenziando quindi 
una buona disponibilità di risorse ne¬ 
cessaria per soddisfare i debiti a bre¬ 
ve. Questo indice può essere depura¬ 
to del magazzino, in tal caso è noto 
con il nome di Prova acida. Questo 
perché probabilmente non tutto il 
magazzino, in caso di necessità, può 
trasformarsi velocemente in liquidi¬ 
tà. Il valore del rapporto dovrebbe es¬ 
sere tra 1 e 2 a seconda del peso del 
magazzino sul totale delle attività 
correnti e della velocità di realizzo 
del magazzino stesso. 

Giuseppe Durazzano 


f Questo programma è disponibile ^ 
su dischetto. L’elenco, i prezzi 
e le modalità d’ordine di questo 
e degli altri dischetti disponibili 
sono riportati nella rubrica 
v Disk Service. , 







QUESTA PAGINA VALE PIU 
DI UN MILIONE E MEZZO 


ITABV001 

APPLE II GS 

Personal Computer 512K RAM 

Ut. 540.000 

A2M6016Z 

Monitor Monocromatico per Apple IIGS 

Ut. 102.000 

A2M6014Z 

Monitor Colori RGB per Apple IIGS 

Ut. 297.000 

A9M0106Z 

Unità Disco 3,5" per Apple IIGS 

Ut. 255.000 

A9M0107Z. 

Unità Disco 5" 1/4 per Apple IIGS 

Ut. 150.000 

ITABM004 

Stampante ImageWriter II per Apple IIGS 
(solo in congiunzione con l'acquisto 
dell'unità centrale Apple IIGS) 

Ut. 360.000 


Nome 

Indirizzo Telefono 

Località 

Professione 


Presentandovi con questa pagina (non una fotocopia) compilata secondo le vostre necessità 
di acquisto presso il vostro APPLE CENTER di fiducia, riceverete i prodotti da voi indicati con una 
riduzione sul valore del listino prezzi suggerito al pubblico pari alla cifra sopraindicata. 

(IVA e spese di installazione escluse). 

Editronica, inoltre, offrirà agli acquirenti di un IIGS un abbonamento a 6 numeri di Applicando. 
Offerta valida per ordini pervenuti ad Apple Computer inderogabilmente entro il 30/06/87. 

Nella pagina che segue trovate l'elenco degli Apple Center. 


Apple Center 
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Località 
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Centri di training, * 

vendita e assistenza in Italia. Apple Computer 


Elenco aggiornato al 6 marzo 1987 


Realizzato con un sistema Apple EdIT. 


La sinergia tra informatica e didattica è forte. Il progetto di cui parliamo 
a partire da questo numero è teso alla realizzazione 
di un pacchetto di tipo courseware avanzato che, opportunamente 
sezionato, permetterà interventi sia di didattica 
sia di informatica, direttamente fruibili da parte del lettore. 

Ed ecco 

l’istruttore autore 


Inizia in questo numero di Appli¬ 
cando una serie di interventi su argo¬ 
menti quali il linguaggio Pascal, le 
tecniche di programmazione, l'uso 
in didattica delle strutture ad albero e 
l’istruzione programmata. Una serie 
di programmi che, una volta comple¬ 
tati, costituiranno un vero e proprio 
sistema autore per esercizi ad albero 
e rappresenteranno le teorie didatti¬ 
che e informatiche trattate. 

Le sezioni del lavoro che ci appre¬ 
stiamo a presentare sono perciò tre: 

1) Elementi di Pascal: si intende ri¬ 
prendere, in modo sintetico ma com¬ 
pleto, tutta la parte sintattica del lin¬ 
guaggio, nell'intento di fornire una 
guida di consultazione rapida. 

2) Introduzione alle strutture di i- 
struzione programmata, di albero di 
Hufmann e di analisi statistica, nella 
didattica e nella pedagogia. 

3) Elaborazione di software evolu¬ 
to, come concretizzazione delle basi 
teorico/pratiche trattate, e listati del 
sistema autore. Per comodità di te¬ 


sto, chiameremo questo software 
SAIP, Sistema Autore in Istruzione 
Programmata. Ciascuna fase di arti¬ 
coli sarà completata dalla implemen¬ 
tazione di una serie di item di fisica, 
che renderà immediatamente utilizza¬ 
bile sul calcolatore il SAIP. 

Strutture ad albero 

Uno dei ruoli più interessanti e op¬ 
portuni dell'informatica è quello di 
insegnare allo studente a esercitarsi 
durante l'apprendimento della mate¬ 
ria, verificandone in tal modo il li¬ 
vello delle acquisizioni. Per proporsi 
questa ottica occorre in prima istan¬ 
za superare una dicotomia di utilizzo 
dell'elaboratore, generatasi tempo fa, 
quando non era forse ancora ben chia¬ 
ro a cosa servivano le macchine nel¬ 
l'insegnamento. A tutt'oggi infatti 
sono due le proposte nel campo del¬ 
la didattica informatica: il coursewa¬ 
re tradizionale (nel quale si possono 
far rientrare software di simulazione 
e veri e propri libri elettronici), e l’e¬ 


sercitazione interattiva, che delega al¬ 
l'elaboratore il controllo dell'appren¬ 
dimento dello studente, tramite una 
serie di test. Tutta una ricca letteratu¬ 
ra psico-pedagogica e docimologica 
è dedicata al problema da oltre ven¬ 
tanni. 

I programmi presentati negli arti¬ 
coli sono stati pensati per un alto 
grado di individualizzazione, tale da 
favorire la molteplice interazione stu¬ 
dente-elaboratore: essi si possono 
porre quindi come un importante mo¬ 
mento di verifica e di sedimentazio¬ 
ne dei contenuti appresi: sta all’inse¬ 
gnante valutare i tempi e le modalità 
di proposizione. 

La struttura del SAIP è tale che 
gli item dei questionari con esso rea¬ 
lizzati possono essere collocati entro 
la tassonomia di Bloom (saper me¬ 
morizzare,capire,applicare,analizza¬ 
re, sintetizzare, valutare). Le soluzio¬ 
ni presentate al termine di ogni serie 
di articoli adottano e privilegiano (se¬ 
condo Crowder) la correzione e la va- 
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SAIP: ecco gli elementi base 

• identificatore. E' semplicemente un nome, utilizzato, ad esem¬ 
pio, per la costruzione di variabili o costanti. Maiuscole e minuscole 
sono trattate allo stesso modo (ALFA e alfa sono lo stesso identificato¬ 
re). In Apple UCSD Pascal si può usare anche come estensione il caratte¬ 
re underscore (“_”)• 

Per esempio: identificatore_lungo (figura 4) 

• parole riservate. Nella costruzione degli identificatori occorre e- 
vitare di usare le seguenti parole riservate. In caso contrario il compila¬ 
tore segnalerà errore. 


Pascal standard 

Apple Pascal 

and 

mod 

extemal 

array 

nil 

implementation 

begin 

not 

interface 

case 

of 

segment 

const 

or 

unit 

div 

packed 

uses 

do 

procedure 


downto 

program 


else 

record 


end 

repeat 


file 

set 


for 

then 


forward 

to 


function 

type 


goto 

until 


if 

var 


in 

while 


label 

with 



• commenti. Sono racchiusi tra parentesi graffe o tra parentesi ton¬ 
de e asterischi. Permettono l'inserimento di testo arbitrario. 

Per esempio: { Questo è un commento } 

(* Altro commento *) 


lutazione degli errori, rispetto all’esi¬ 
to immediatamante corretto o no di 
un item. 

La realizzazione di questionari con 
il SAIP permetterà perciò la realizza¬ 
zione di corsi sia di sostegno sia di 
recupero, lasciando all’insegnante la 
più completa discrezionalità sui tem¬ 
pi e sui contenuti delle proposte, se¬ 
condo le proprie individuali esigen¬ 
ze. 

Il progetto, in una forma più am¬ 
pia e articolata, è stato presentato 
sperimentalmente ad alcune classi di 
liceo e istituto tecnico: i risultati ot¬ 
tenuti hanno consentito la taratura 
delle batterie di item presentate e la 
specializzazione di una serie di linee 
guida per la implementazione di que¬ 
stionari. Queste ultime saranno pre¬ 
sentate in uno dei prossimi articoli. 

Organizzazione del SAIP 

I programmi presentati saranno 
strutturati in modo tale che a cia¬ 
scun articolo restino associati alcuni 
concetti base di programmazione Pa¬ 
scal avanzata. Come si troverà spie¬ 
gato in seguito, il lettore potrà con¬ 
cretamente verificare le nozioni intro¬ 
dotte realizzando programmi, o parti 
di essi, che esemplificano concreta¬ 
mente quanto enunciato dal testo. In 
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questo modo il lettore si costruirà, 
passo dopo passo, l’intero sistema 
SAIP, grazie al quale potrà imple¬ 
mentare una serie di batterie di test 
per qualsiasi materia di studio. 

Il programma (o i programmi) pre¬ 
sentati in ciascun articolo sono auto¬ 
concludenti: questo significa che pos¬ 
sono essere già utilizzati nella loro 
forma di presentazione; tuttavia, essi 
saranno ampliati negli articoli suc¬ 
cessivi con l'introduzione di nuove 
routine o programmi integrativi. E’ 
a discrezione del lettore stabilire un 
punto di arrivo, tenendo presente che 
le batterie di test che saranno presen¬ 
tate funzioneranno al meglio nella 
versione di SAIP in quel momento 
realizzata. 

Il SAIP sarà costituito da due pro¬ 
grammi distinti: il primo, rivolto al¬ 
l’insegnante, permetterà l'immissio¬ 
ne dei singoli item, mentre il secon¬ 
do, fruibile dallo studente, presenterà 
a video le domande e si aspetterà dal¬ 
l'utente le risposte. Per semplicità, 
chiameremo il primo Sistema di Svi¬ 
luppo e il secondo Runtime (figura 
1 ). 

La struttura del SAIP è tale da per¬ 
mettere di realizzare questionari che 
si dipanano nella logica dell'albero 
binario (figura 2): allo studente sa- 


Costante senza segno 



Costante 



Figura 7. 


SAIP: chi lo utilizza 

Gli articoli si rivolgono prevalentemente agli insegnanti, e questo sia per l'evidente vocazione didattica de¬ 
gli articoli, sia per l'oggetto del SAIP stesso. Si curerà in modo particolare l'integrazione della parte di infor¬ 
matica con i temi affrontati dai poli di formazione ministeriale in corso di realizzazione in tutta Italia proprio 
in questi mesi, in modo da arricchire di soluzioni operative questo momento di svolta nella didattica della scuo¬ 
la italiana. Tuttavia le parti più tecniche sul linguaggio potranno essere di valido ausilio per qualsiasi hobbista 
e appassionato di programmazione, poiché la loro estrema specificità è tale da completare e corredare, piutto¬ 
sto che sovrapporre, il contenuto dei libri di Pascal attualmente in commercio; infatti quasi tutti questi ultimi 
non si spingono oltre la più semplice ed elementare alfabetizzazione. Per potere beneficiare al massimo di 
quanto presentato, si richiede perciò al lettore la conoscenza dei fondamenti del linguaggio Pascal. 

L'elaborazione, in più puntate, di Elementi di Pascal è stata pensata come quella di un documento riassuntivo 
e di rapida consultazione, finalizzato agli obiettivi didattico-informatici che si vogliono perseguire; si tratta 
dunque di una presentazione del Pascal come reference piuttosto che come tutorial. Del resto, proprio Applican¬ 
do , nel 1984, è stata tra le prime riviste a offrire una serie di articoli di alfabetizzazione Pascal; a essi rinvia¬ 
mo il lettore esigente alla ricerca di una completezza d’informazione in tal senso. 


SAIP: chi lo propone 

Ivan Spelti è ordinario di Fisica in un Istituto tecnico di Reggio Emilia. Dal 1974 si occupa di sperimen¬ 
tazione didattica e di struttura; dal 1983 di informatica, con particolare riferimento al courseware di Fisica e ai 
problemi pedagogici e docimologici collegati. Attualmente si occupa di sviluppo software in Fisica e Matemati¬ 
ca per scuole superiori. 

Mario Pinciani, perito in informatica, deve la sua esperienza a un lustro passato come tecnico software al¬ 
la Apple Computer Italia. Attualmente si occupa di consulenza e di sviluppo software su sistemi a microproces¬ 
sore. Oltre alla didattica informatica, i suoi interessi spaziano nell'ambito della comunicazione dati e dei lin¬ 
guaggi di quarta generazione. 

Gli autori collaborano da tempo per la realizzazione di progetti informatico-didattici, con particolare riferi¬ 
mento allo sviluppo di sistemi avanzati. 
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rà presentata a video una domanda la 
cui risposta è SI/NO. L’elaboratore 
la valuterà e salterà a una successiva 
domanda, dipendentedallacorrettezza 
o meno della risposta. 

La maschera video tipo che pre¬ 
senterà il Runtime è la seguente: 


<Item: 3> Applicando Esc:aiuto 


shgfjg dfghdfg jgh dfgjhdjfghdfgjh 
jdh j 

djfghjkfghjdh j j dfjghdjfgh dfgjd 
fgjdg 

dk fj djfhgjk gdfjg dfjgh dkjdfghjdfg 

jg 

TESTO 

DELLA DOMANDA 

djghdg jdkfgjhdkj dfgjhdf jgdhjfkg 
dfjkh 

dfgjlkfgkl dfgjkl fgjklf gjd dfgj 
ldfdfg 

fghklj fghjlfghkfg flgh lkflghjlf 
flghj. 


Risposte: 

(S)i (N)o - (G)rafico (F)ine 


Nel sistema di sviluppo, l’elabora¬ 
tore richiede di immettere il testo del 
singolo item, più una serie di infor¬ 
mazioni supplementari, come per e- 
sempio l'indicazione delfitem da cari¬ 
care se la risposta è corretta. La strut¬ 
tura dati dell'archivio di domande sa¬ 
rà presentata in modo specifico nella 
prossima puntata. 

Sempre nella prossima puntata si 
inizierà la scrittura dei primi pro¬ 
grammi, che permetteranno di parla¬ 
re in modo specifico di tecniche di 
programmazione. 

Gli interventi rivolti al SAIP si 
svolgeranno secondo il seguente 
schema: 

1. I/O su disco - Una delle pri¬ 
me funzioni che dovrà svolgere il 
SAIP sarà quella di scrivere (il Siste¬ 
ma di Sviluppo) e leggere (il Runti¬ 
me) dati da disco. La prima occasio¬ 
ne sarà perciò quella di mostrare co¬ 
me il Pascal tratta i file su disco, e 
come i dati da esso trasferiti posso¬ 
no poi essere trattati in memoria cen¬ 
trale. 

2. Input controllato - Si par¬ 
lerà dell’integrazione tra Assembler 
6502 e Pascal. La routine, in lin¬ 
guaggio macchina, si preoccuperà di 
prelevare i dati direttamente da tastie- 


L'abc di un programma Pascal 


Tipi di dati 

Tra i tipi di dati semplici troviamo quelli classici gestiti da altri lin¬ 
guaggi di programmazione (figura 5). 

integer: Numero intero (da -32768 a +32767). 
reai: Numero frazionale. 

boolean: Assume i soli valori TRUE (vero) e FALSE (falso), 
char: Il singolo carattere. 

string: E' un array di caratteri, fa parte delle estensioni Apple al Pascal 
standard. 

Operazioni sui dati 

Tutta una serie di operatori sono definiti per potere manipolare i dati so¬ 
pra elencati. Le operazioni di seguito elencate sono raggruppate secondo il 
tipo di dati che trattano. 

* integer 

+ somma 

sottrazione 

* moltiplicazione 

div divisione { es. 23 DIV 4 = 5) 

mod resto della divisione { es. 23 MOD 4 = 3} 

* reai 

+ addizione 

sottrazione 

* moltiplicazione 

/ divisione 

round approssimazione { ROUND(12.7) = 13 ) 
trunc tronca i decimali { TRUNC(12.7) = 12 } 

si tenga presente la regola: ROUND (x) = TRUNC (x + 0.5) 

« boolean 

not valore negato { se true allora diventa false e viceversa } 

and entrambi veri { a and b ritorna vero solo se a e b sono entrambi 

veri } 

or solo uno vero { a or b ritorna vero se a oppure b è vero } 

=, <>, <, operatori relazionali generici 

<=, >, >= 

» char 

ord ritorna il codice numerico del carattere 
chr ritorna il carattere con quel codice 

Funzioni predefinite 

Una serie di funzioni base sono built-in nel Pascal, e perciò sono imme¬ 
diatamente utilizzabili. Il raggruppamento è effettuato in base al tipo di da¬ 
to che è ritornato dalla funzione. 

« risultato boolean 
odd l’integer è dispari 

« risultato char 

chr ritorna il carattere con quel codice 
« risultato integer 

abs valore positivo assoluto di un integer 
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sqr quadrato 

ord posizione nella tabella ASCII 
» risultato retti 

abs valore positivo assoluto di un reai 

sqr quadrato 

sqrt radice quadrata 

sin seno { angolo in radianti } 

cos coseno { angolo in radianti } 

arctan arcotangente { angolo in radianti } 

In logaritmo neperiano 

exp esponenziale 

Struttura di un programma Pascal 

La struttura più elementare di un programma è quella mostrata. Anche 
versioni più complesse comunque seguono questo schema. 

program nome_programma; 

dichiarazioni 

begin 

programma 

end. 

Dichiarazioni 

La prima cosa richiesta da un programma Pascal è quella di definire i 
nomi (grazie agli identificatori) delle costanti e delle variabili che saranno 
utilizzate in seguito. La dichiarazione avviene premettendo una parola 
chiave, seguita dalla lista di dichiarazioni (figura 6). 

• CONST. Dichiara le costanti utilizzate dal programma. Dare un no¬ 
me a una costante serve per meglio identificarla nel corso del 

programma. Esempio: const PI = 3.14159; 

• VAR. Dichiara le variabili utilizzate dal programma. Esempio: var al¬ 
pha : char; (figura 7). 

Statement 

Gli statement (o istruzioni) permettono lo svolgersi del programma. 
Non si dimentichi che il Pascal è un linguaggio di tipo imperativo. L'i¬ 
struzione più semplice è quella di assegnamento, cioè l'associazione a u- 
na variabile di una espressione che, nella forma più semplice, può essere 
un’altra variabile o una costante: 

variable := expression; 

Uno statement semplice è concluso da un punto e virgola (;). 

Il compilatore Pascal accetta il free-form, quindi non è necessario che o- 
gni singolo statement sia su una unica riga, o incolonnato sulla posizio¬ 
ne del tabulatore. Non necessariamente uno statement è di una singola i- 
struzione, bensì può essere composto come segue: 

begin 

AChar := spazio; 

Count := Count +1 
end; 

Questo riportato è un singolo statement, anche se composto da più e- 
spressioni. Le parole chiave Begin e End servono a identificare l'inizio e 
la fine dello statement. 



ra, passandoli a una in Pascal che 
controllerà la loro appartenenza al¬ 
l'intervallo di caratteri accettati come 
input. Con l'opportuno inserimento 
di queste funzioni in una libreria, si 
creerà una base ad accesso comune 
per i vari programmi. 

3. Gestione video testo/gra¬ 
fica - Il Pascal possiede diversi co¬ 
mandi per la trattazione della grafica, 
che si può gestire sia in modo carte¬ 
siano (il punto è definito da coordina¬ 
te XY), che come turtle-graphics (si¬ 
milare al linguaggio Logo). Tutta¬ 
via nei manuali non si spiega come 
memorizzare o caricare da disco una 
intera pagina HGR. 

Similarmente, saranno presentate 
delle routine che permetteranno di 
sveltire le operazioni di visualizza¬ 
zione della pagina testo, permetten¬ 
do così di inserire nel SAIP un vero 
e proprio sistema di help a video, ve¬ 
loce ed efficiente. 

4. Caratteri grafici - Si esplo¬ 
reranno le possibilità di utilizzare le 
routine avanzate di grafica messe a 
disposizione dal Pascal per dare un 
look professionale al SAIP. 

In particolare si realizzeranno dei 
caratteri grafici e si parlerà di matrici 
di punti. 

Elementi di Pascal 

In questa prima parte si andranno 
ad analizzare quelli che sono gli ele¬ 
menti base costitutivi del linguag¬ 
gio. 

Una particolare menzione deve es¬ 
sere fatta per i diagrammi sintattici 
che verranno sempre affiancati alla 
parte di testo. Essi forniscono l'esat¬ 
ta costruzione delle singole parti del 
programma grazie a una rappresenta¬ 
zione visiva di immediata compren¬ 
sione. 

Se si intende, per prendere un e- 
sempio semplice, costruire un identi¬ 
ficatore, si dovrà agire nel seguente 
modo: scorrendo il diagramma da si¬ 
nistra verso destra, il primo elemen¬ 
to da inserire sarà una lettera; succes¬ 
sivamente si potranno inserire sia 
lettere sia numeri, percorrendo, sem¬ 
pre secondo il senso delle frecce, u- 
no dei due blocchi indicanti lettera 
oppure numero. 

L'interpretazione che va fatta dei 
tre tipi di blocchi è quella mostrata 
nella figura 3. 

Ivan Spelti 

J Mario Pinciani 
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appianiamo 

i vostri problemi 

Vuoi una stampa di 

riviste, bilanci, volumi, manuali, ecc... 

senza p ossibilità d’errori? 

hai i testi, i dati, i grafici 

memorizzati su floppy-disk 
Macintosh™o MS-DOS®? 

in poche 
ore 



noi ricaviamo 

pellicole ad alta definizione 

2540 linee/pollice 

direttamente dal tuo dischetto 
con sofisticati sistemi 
di fotocomposizione 


in pochi 
giorni 


ti consegnamo 

il tuo lavoro stampato 

perché questo è il nostro 
mestiere da oltre 50 anni 



Applicando viappiani 

la via è più breve! 



viappiani 


Industria Grafica 
Bruno Viappiani spa 


20133 Milano Viale Argonne, 28 
Tel. 02*73 84 341 (5 linee r.a.) 


Telex 325421 VIAPPI 
Telefax 02*73 84345 






















































GESTIONE VIDEO 


L'Apple II è una macchina fantastica sempre rivolta alle innovazioni, 
ma il suo piccolo neo è il Basic, che si porta dietro 
istruzioni che non sfruttano appieno le capacità del computer; quindi... 

Benvenuto 

mouse! 


Da diversi anni è reperibile in com¬ 
mercio una scheda per computer del¬ 
la serie Apple II che implementa 
queirutilissimo dispositivo di I/O 
quale è il mouse. La potenza del 
mouse però, non è stata molto utiliz¬ 
zata, in special modo per quella fa¬ 
scia di hobbisti che amano creare 
programmini in Basic, dal momento 
che attivare il mouse significa com¬ 
promettere il funzionamento di tutto 
il computer. 

Infatti è faticoso costruire una rou¬ 
tine Basic che con il mouse attivo 
invii dati al video, o al drive, o alla 
stampante. L'unico sistema per sem¬ 
plificare la vita ai programmatori in 
Basic è quello di implementare nuo¬ 
ve istruzioni che interfaccino il Ba¬ 
sic col mouse. Questo è proprio 
quanto si propone il programma 
Mr.Mouse, che gira sia sotto DOS 
che sotto ProDOS; se però avete as¬ 
semblato i listati 1 e 4 in ambiente 
ProDOS, prima di controllarli con 
Apple Checker 3.0 dovete convertir¬ 
li in DOS 3.3. 

Mr.Mouse può essere copiato dal 
listato 1 con l'ausilio di un assem¬ 
blatore o dal Monitor dopo aver in¬ 
trodotto CALL-151, e salvato poi 
con 


BSAVE MR.MOUSE 
,A$5FFD,L$3DC 


Per chi è poco pratico nell'introdu- 
zione di un programma, è consiglia¬ 
bile consultare la rubrica "Per chi co¬ 
mincia” presente su questo numero. 

Operazione preliminare 

Il programma di gestione del mou¬ 
se visibile nel listato 1 alle linee 
257-507 non è in grado di operare di¬ 


rettamente, ma è necessario che sia 
rilocato in un'area di memoria in mo¬ 
do da non disturbare il corretto fun¬ 
zionamento del computer. Per far 
ciò, Mr.Mouse contiene una routine 
(linee 73-251) che permette il riloca- 
mento del gestore in un'area definita 
dall'utente e contemporaneamente la 
modifica dei puntatori di Reset, Am- 
persand (&) e IRQ. 

Esistono tre modi di accesso al ri¬ 
locatore* 

1) Con BRUN MR.MOUSE solo 
in modo diretto, poiché il program¬ 
ma in Basic terminerebbe. Successi¬ 
vamente viene richiesto l'inserimen- 
to deH’indirizzo di destinazione, in 
notazione esadecimale, del gestore 
del mouse e se ignorare o meno gli 
interrupt non provenienti dal mouse 
(consigliabile se non esistono altre 
fonti di interrupt). 

2) Con BLOAD MR.MOUSE, 
sia da programma che in modo diret¬ 


to, seguito da CALL 24576 o 
6000G dal monitor; seguono le stes¬ 
se richieste del punto 1. 

3) Con BLOAD MR.MOUSE e 
CALL 24698,Destinaz.,Disabil.int 
sia da programma che in modo diret¬ 
to, dove Destinaz. è la locazione di 
destinazione (in decimale) del gesto¬ 
re del mouse. Se Disabil.int è diver¬ 
so da 0, il programma viene forzato 
a considerare solo gli interrupt prove¬ 
nienti dalla scheda Applemouse, al¬ 
trimenti considererà tutti gli interrup- 
t, qualora venga posto Disabil.int 
uguale a 0 o ignorato. 

Una volta che il rilocatore ha siste¬ 
mato il gestore, quest’ultimo viene 
collegato al resto del computer, che 
infatti controlla: il Reset, in modo 
da reinizializzare il mouse ogni qual 
volta viene premuto; le richieste di 
interrupt, considerando solo quelle 
che provengono dal mouse, mentre 
può sopprimere o no le altre; l'Am- 
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Tavola 1 

Modi operativi della Scheda Applemouse 

M. Op. Descrizione 

00 Disattiva il mouse 

01 Attiva il mouse 

02 Abilita gli interrupt sul movimento del mouse 

04 Abilita gli interrupt quando si preme il pulsante 

08 Abilita gli interrupt a ogni rigenerazione del video 



Tavola 2 

Significato dei bit del byte di stato del mouse 

Cifra Descrizione 

1 Pulsante premuto 

2 Pulsante premuto nell'ultima lettura 

3 Coord. X o Y diverse dall’ultima lettura 

4 Riservato 

5 Interrupt: rigenerazione video 

6 Interrupt: il pulsante è premuto 

7 Interrupt: il mouse è stato spostato 

8 Riservato 


persand, che è l’istruzione Basic che 

10 collega al programma (in Basic), 
infatti le nuove istruzioni sono state 
create con l’ausilio di questa. 

Uso e sintassi delle istruzioni 

&CALL non fa altro che riattiva¬ 
re il mouse qualora sia stato disatti¬ 
vato. 

&INT (Modo,Indir) oppure 
&INT(Modo) stabilisce il modo o- 
perativo della scheda Applemouse. 
Nella tavola 1 sono visibili i mo¬ 
di operativi principali, gli altri pos¬ 
sono essere ricavati dalla somma di 
di quelli principali; per esempio il 
modo operativo 13 attiva il mouse 
(cioè vengono controllati movimen¬ 
to e pressione del bottone), e abilita 
gli interrupt qualora venga premuto 

11 bottone o in caso di rigenerazione 
dello schermo (ogni 60esimo di se¬ 
condo), cioè 144+8=13. 

Indir, indica l'indirizzo a cui 
Mr.mouse salterà in caso di inteirup- 
t della scheda. Se si ignora Indir., 
Mr.mouse salterà alfindirizzo che e- 
ra stato stabilito precedentemente. 

. Come esempio, provate a dare l'i¬ 
struzione &INT (5,-936) e a ogni 
pressione del tasto otterrete la cancel¬ 
lazione del video, oppure &INT (8,- 
1184) che visualizzerà ogni 60esi¬ 


mo di sec. il titolo APPLE ][. 

&READ Var.X , Var.Y , 
Var.Stato pone nelle variabili 
Var.X , Var.Y e Var.Stato rispettiva¬ 
mente il valore della posizione oriz¬ 
zontale, di quella verticale e lo stato 
del mouse. 

Var.Stato può essere una variabile 
numerica o una stringa: in quest'ulti¬ 
mo caso i caratteri costituenti la 
stringa saranno otto cifre che rappre¬ 
sentano, in formato binario, lo stato 
del mouse (nella tavola 2 è indica¬ 
to il significato di ogni singola ci¬ 
fra). 

Nel caso in cui, in un programma, 
sia necessario leggere i dati del mou¬ 
se, lasciandone invariato qualcuno, 
si potrà optare per questa scelta, sem¬ 
plicemente, omettendo il nome della 
variabile. Così, ad esempio, se si 
vuole assegnare solamente la posi¬ 
zione orizzontale alla variabile QW 
e lo stato del mouse alla WQ, si 
può impartire un’istruzione del tipo 
&READ QW„WQ 

&CLEAR porta a 0 la posizione 
orizzontale e quella verticale. 

&POS Coord.X , Coord.Y 
forza la posizione orizzontale e quel¬ 
la verticale del mouse ai valori conte¬ 
nuti rispettivamente nelle variabili 
Coord.X e Coord.Y. 


Anche in questa istruzione è possi¬ 
bile impostare uno solo dei parame¬ 
tri, o Coord.X o Coord.Y, ignoran¬ 
do l'altro (naturalmente, il secondo 
va preceduto da una virgola). 

• &STEP XI TO X2 , Y1 
TO Y2 stabilisce i confini dei valo¬ 
ri della posizione del mouse. 

I parameri XI e X2 sono, rispetti¬ 
vamente, i nuovi limiti inferiore e 
superiore dell'escursione orizzontale, 
mentre Y1 e Y2 lo sono di quella 
verticale. . 

Anche per questa istruzione vale 
quanto detto per le altre, cioè è possi¬ 
bile stabilire uno solo dei confini (o 
XI TO X2 o ,Y1 TO Y2). 

■ &HOME porta la posizione o- 
rizzontale e verticale del mouse ai va¬ 
lori dei limiti inferiori. 

• &END disattiva il programma, 
rimettendo a posto i vettori di Re¬ 
set, Ampersand e Richiesta di inter¬ 
rupt. Ciò implica l'impossibilità di 
utilizzare le nuove istruzioni. 

E’ necessario impartire questa istru¬ 
zione prima di eseguire un altro pro¬ 
gramma che utilizzi Mr.Mouse, poi¬ 
ché il contenuto di tali vettori an¬ 
drebbe perduto. 

Programmi dimostrativi 

Tre programmi sono stati svilup¬ 
pati come dimostrazione dell’utilizzo 
di Mr.Mouse, dei quali due in Basic 
sotto ProDOS (ma funzionano an¬ 
che in DOS 3.3), che mostrano l’im¬ 
piego delle nuove istruzioni, e uno 
in linguaggio macchina, che mostra, 
invece, un classico uso degli inter¬ 
rupt. 

Nel listato 2 è visibile il pro¬ 
grammino che permette la visualizza¬ 
zione dei parametri e delle variazioni 
conseguenti il movimento o la pres¬ 
sione del tasto del mouse. 

I parametri possono essere variati 
premendo i tasti indicati in basso 
nello schermo e rispondendo alle ri¬ 
chieste (i valori da inserire rispetta¬ 
no le caratteristiche descritte in "uso 
e sintassi delle istruzioni”). 

Dopo aver copiato il listato, salva¬ 
te con 


SAVE MOUSE.DEMO 


Nel listato 3 è mostrato un gio¬ 
co, composto da tre solitari: quindi¬ 
ci, dama versione inglese e dama ver¬ 
sione francese. Dopo averlo copiato 
e salvato con 

SAVE MOUSE.GAMES 
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e aver dato il RUN, viene visualizza¬ 
ta la linea dei comandi (stile Mac-li- 
ke) e un + che è possibile spostare 
col mouse. Portando questa "freccia" 
su GAMES e, premendo e rila¬ 
sciando il bottone del mouse, appare 
la lista dei giochi che è possibile sce¬ 
gliere con un clic. 

Tramite questa opzione è anche pos¬ 
sibile sospendere momentaneamente 
un gioco, giocare con un altro, e ri¬ 
tornare sullo stesso. Se si sceglie u- 
na delle dame, è inizialmente neces¬ 
sario eliminare con un clic quanti 
pioli si vogliono. Per giocare, fate 
clic su una parte vuota. 

Fate clic su NEW per iniziare di 
nuovo lo stesso gioco e su END 
per uscire dal programma. 

Impiego degli interrupt 

Come sapete, gli interrupt sono 
dei segnali che arrivano al micropro¬ 
cessore con lo scopo di far interrom¬ 
pere il suo lavoro e far eseguire una 
determinata routine. 

In questo caso, la routine che vie¬ 
ne eseguita è quella di gestione degli 
interrupt (linee 474-502 del listato 
1) la quale, saltando a una subrouti¬ 
ne del Firmware del mouse, ricono¬ 
sce se Tinterrupt è stato generato dal¬ 
la scheda o no, eseguendo o no un 
programma. 

Gli interrupt non generati dalla 
scheda, come già detto, possono o 
meno essere ignorati: tale funzione è 
espletata dalla locazione 


Inizio.progr.di.gestione + 456 


con i valori 3 e 12 (rispettivamente 
ignora e non), che possono essere 
scambiati in qualsiasi momento. 

La scheda Applemouse è in grado, 
a seconda del modo operativo, di ge¬ 
nerare interrupt in caso di pressione 
del tasto e/o movimento del mouse, 
oppure ogni 60esimo di secondo, 
cioè ad ogni rigenerazione dello 
schermo. 

La lettura della locazione 1912 + 
N.slot.mouse dà la possibilità di co¬ 
noscere il tipo di interrupt: la tavo¬ 
la 2 descrive il significato di ogni 
singolo bit di tale locazione. 

Dalla possibilità di avere delle in¬ 
terruzioni che si verificano costante- 
mente è nato il programma visibile 
nel listato 4 che è un orologio in 
grado di dare, con la lettura di alcune 
locazioni, 60esimi di secondo, secon¬ 
di, minuti e ore; gli ultimi tre posso¬ 
no essere visualizzati sul video a 40 


colonne. Il programma può essere 
copiato con fausilio del ProDos To¬ 
ol Kit Assembler o dal monitor, do¬ 
po aver inserito CALL -151, e sal¬ 
vato con 


BSAVE MOUSE.TIME 
,A$300,L$88 


Le locazioni di memoria relative 
all'orario sono visibili nella tavola 
3 e le informazioni in esse contenu¬ 
te possono essere lette con un sem¬ 
plice PEEK loc. o modificate con 
POKE loc. 

Per esempio se l'orario deve essere 
stampato sul video bisogna porre 
nella locazione 818 il valore 56 
($38) altrimenti il valore 24 ($18); i- 
dem per la 840 che permette la vi¬ 
sualizzazione in Inverse o Normal a 
seconda che si ponga in valore 127 
o 255 nella locazione. 

I nuovi puntatori 

Come già detto, i puntatori di Re¬ 
set, Ampersand e IRQ vengono mo¬ 


dificati e diretti all'interno del pro¬ 
gramma, ma può capitare che neces¬ 
siti, in eventuali routine in LM, la 
loro variazione. Ciò non è consiglia¬ 
bile; infatti, se per esempio si modi¬ 
ficasse il puntatore di Reset, non si 
avrebbe più la reinizializzazione in 
caso di reset. 

Proprio per questo motivo sono 
stati inseriti nel programma dei salti 
(JMP), i quali, con la loro modifica, 
assolvono la funzione dei puntatori 
sopra citati. 

Il nuovo puntatore di Ampersand è 
quello presente alla linea 433 (JMP 
....). Il programma di gestione del 
mouse salta all’indirizzo indicato, so¬ 
lo dopo aver controllato che quello 
che c'è dopo il comando &, non sia 
un'istruzione per il mouse. Ciò, na¬ 
turalmente, consente ad altri pro¬ 
grammi (come quelli pubblicati su 
questa rivista, che usufruiscono del¬ 
l'istruzione & per la creazione di al¬ 
tre istruzioni), la possibilità di co- 
funzionare con Mr.Mouse. 

Se un programma che usufruisce 


Tavola 3 

Locazioni principali di Mouse.Time 


Dee. 

Hex. 

Commento 

772 

$304 

60esimi di sec 

786 

$312 

secondi 

798 

$31E 

minuti 

810 

$32A 

ore 

818 

$332 

se è 56 stampa su video 
se è 24 non stampa 

831 

$33 F 

HTAB (dell’orario) 

835 

$343 

VTAB (deH'orario) 

840 

$348 

se è 127 stampa in INVERSE 
se è 255 stampa in NORMAL 



Tavola 4 

Locazioni dei token utilizzati con l’ampersand 

Linea 

Loc. Locazione 

Valori normali 


(listato.l) 

(prg. rilocato) 

257 

$61 FA Inizio+ 4 

$8C.= Token di CALL 

281 

$6220 Inizio + 42 

$D3 = Token di INT 

306 

$6254 Inizio + 94 

$87 = Token di READ 

361 

$62CB Inizio+ 213 

$BD = Token di CLEAR 

365 

$62D4 Inizio+ 222 

$D9 = Token di POSI 

382 

$62FE Inizio+ 264 

$C7 = Token di STEP 

407 

$633 D Inizio+ 327 

$80 = Token di END 

419 

$635 E Inizio+ 360 

$97 = Token di HOME 
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dell'Ampersand fosse presente prima 
dell'esecuzione di Mr.Mouse, conti¬ 
nuerà a operare anche dopo, proprio 
perché viene conservato il puntatore 
al programma in dette locazioni. 

I nuovi puntatori per gli interrupt 
(IRQ) e per il Reset sono visibili ri¬ 
spettivamente alle linee 503 e 506. 
Per la modifica di tali puntatori è ne¬ 
cessario inserire la parte bassa dell'in- 
dirizzo nelle locazioni: 


Inizio.progr.di.gestione + 378 per 
l'ampersand 

Inizio.progr.di.gestione + 476 per le 
richieste di interrupt (IRQ) 
Inizio.progr.di.gestione + 482 per il 
reset 


e quella alta nella locazione successi¬ 
va. 

Routine principali 
di Mr. Mouse 

La quantità di note inserite nel pro¬ 
gramma del listato 1 permette la 
comprensione di ogni singolo pas¬ 
so, quindi verranno menzionate sola¬ 
mente le routine principali. 

• Programma rilocatore: 

Linee 73-105 Punti di accesso al ri¬ 
locatore con visualizzazione delle ri¬ 
chieste e relativi input. 

Linee 109-121 Punto di accesso me¬ 
diante parametri. 

Linee 122-162 Ricerca della scheda 
Applemouse negli slot con stampa 
del messaggio di errore in caso nega¬ 
tivo. 

Linee 163-171 Salvataggio dei vetto¬ 
ri di Reset, Ampersand e IRQ. 

Linee 172-191 Rilocazione degli in¬ 
dirizzi. 

Linee 192-211 Modifica dei puntato¬ 
ri di Reset, Ampersand e IRQ. 

Linee 212-221 Spostamento del pro¬ 
gramma di gestione del mouse. 

Linee 222-228 Termine della Routi¬ 
ne di rilocazione secondo la modalità 
di accesso. 

Linee 229-243 Subroutine di control¬ 
lo e di rilocazione. 

Linee 247-251 Tabella delle locazio¬ 
ni da rilocare. 

• Programma da rilocare: 

Linee 257-433 Controllo ed esecu¬ 
zione delle nuove istruzioni per la 
gestione del mouse. 

Linee 435-473 Subroutine per la ma¬ 
nipolazione delle variabili. 

Linee 475-503 Subroutine per la ge¬ 
stione degli interrupt (IRQ). 


ATTENZIONE! 

I listati sono 
pubblicati alle 
pagine 110-118 


Linee 504-506 Subroutine di Reset. 

Altre possibilità 
e personalizzazioni 

Nel caso in cui in memoria siano 
presenti più programmi che creino i- 
struzioni con l'ausilio dell'Amper- 
sand, e che Mr.Mouse abbia l'istru¬ 
zione Basic dopo l'& identica a un al¬ 
tro, è possibile ovviare a questo in¬ 
conveniente modificando il token 
nella locazione relativa al comando. 
In tal caso viene in aiuto la tavola 
4 che indica le locazioni nelle quali 
è presente il token delle istruzioni 
Basic utilizzate. Se il gestore del 
mouse viene utilizzato in un pro¬ 
gramma in Basic, cioè se diviene par¬ 
te integrante di quest'ultimo, è possi¬ 
bile evitare che di volta in volta ven¬ 
ga caricato ed eseguito l'intero 
Mr.Mouse. Le fasi di questa opzione 
sono: 

- Eseguire Mr.Mouse rilocando il 
gestore nella zona di memoria deside¬ 
rata. 

- Apportare se necessario le variazio¬ 
ni. 

- Salvare con BS AVE Nome,A$ini- 
zio,L$lE4 dove "inizio" è la locazio¬ 
ne di destinazione del gestore in nota¬ 
zione esadecimale; se non si fa prece¬ 
dere dal simbolo $, il numero deve 
essere espresso in notazione decima¬ 
le. 

- Annotare il contenuto delle locazio¬ 
ni :1010-1011, 1014-1015 e 1022- 
1023. 

L'utilizzo della routine sarà, sia in 
modo diretto che da programma, il 
seguente: 

- Caricare la routine con BLOAD 
nome oppure da programma con 
PRINT CHR$(4);"BLOAD nome”. 

- Rimettere il contenuto delle loca¬ 
zioni sopra citate. 

- Impartire l’istruzione &CALL. 

r Questo programma è disponibile ^ 
su dischetto. L’elenco, i prezzi 
e le modalità d’ordine di questo 
e degli altri dischetti disponibili 
sono riportati nella rubrica 
1 Disk Service. 
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Sant'Applicando, 
aiutami tu 

Sono un vostro abbo¬ 
nato dal primo numero. 
Posseggo un Apple II 
plus compatible, con 1 
drive, che ultimamente 
ho completato con l’uni¬ 
co componente mancan¬ 
te, la stampante: un'Oli- 
vetti DM 100 parallela. 

Come interfaccia, vi¬ 
sto che l’Olivetti non ha 
schede per l’Apple, ho u- 
sato una delle tante sche¬ 
de pubblicizzate, di cui 
vi allego schema elettri¬ 
ci. Purtroppo però non 
funziona niente; ho con¬ 
tattato chi mi ha fornito 
la scheda, ottenendo co¬ 
me risposta che la loro 
scheda va bene: a questo 
punto, non sapendo a che 
santo rivolgermi, ho pen¬ 
sato che forse Sant’Appli¬ 
cando è l’unico che mi 
può aiutare. 

Il difetto è il seguente: 
con la scheda della stam¬ 
pante inserita nello slot 
1, accendendo il compu¬ 
ter si ode bip e sul moni¬ 
tor escono le caratteristi¬ 
che barre verticali piene 
di caratteri, però il drive 
non si mette in moto e 
tutto si blocca. 

Ho provato a togliere 
il cavo che va alla stam¬ 
pante, ma ottengo lo stes¬ 
so effetto; solo togliendo 
completamente la scheda 
tutto funziona normal¬ 
mente. Cosa si può fare? 

Adriano Stefanetti 
Legnano 

Il difetto segnalato è 
quasìsicuramentederivan - 
tedaunproblemahardwa- 
redellaschedadiinterfac¬ 
cia. Dopo essersi sincera¬ 
to del corretto inserimen¬ 
to (eventualmente posi¬ 
zionandola anche in slot 
diversi dalli) e avere ese¬ 
guito una pulizia dei con¬ 
tatti della scheda stessa 
(basta passare sulla parte 
che si infila nello slot u- 
na gomma da cancellare 
morbida, del tipo per per 


matita); se il difetto persi¬ 
ste, non le resta che inol¬ 
trar el'interf ac ciaalriven- 
ditoreper la necessaria ri¬ 
parazione. 

Tanta passione, 
una gran curiosità 

Ho sempre letto la vo¬ 
stra rivista da numero 2 
in avanti anche se, non 
essendo abbonato (per pu¬ 
ra pigrizia), mi sono la¬ 
sciato scappare qualche 
numero. 

All'inizio comperavo 
Applicando per il Ile, poi 
grazie a un insperato col¬ 
po di fortuna (in fondo 
ho solo 15 anni e pochi 
soldi, ma anche una gran¬ 
de passione per il compu¬ 
ter) sono riuscito ad ac¬ 
quistare un Macintosh, 
che poi ho espanso in 
Plus. 

Adoro il Mac e ne pen¬ 
so ogni bene; il mio uni¬ 
co dispiacere nel passare 
dall’Apple II al Mac, è 
stato quello di perdere il 
contatto diretto che ave¬ 
vo con il computer (cono¬ 
scevo ogni singola routi¬ 
ne della ROM del Ile, 
mentre questo sembra im¬ 
possibile per quanto ri¬ 
guarda il Mac, e non tan¬ 
to per il volume della 
ROM stessa, quanto per 
una totale e irrimediabile 
mancanza di documenta¬ 
zione). 

Ho cercato dappertutto 
l'Inside Macintosh, senza 
trovarlo: ho anche telefo¬ 
nato fino in capo al mon¬ 
do per parlare direttamen¬ 
te con la Afrografica, ex 
casa editrice dellTnside, 
ma niente da fare. Ho sco- 
pertorecentemente,trami¬ 
te MacWorld , 1’esistenza 
di un testo che farebbe al 
caso mio: Macintosh Re- 
vealed (1° volume: Un- 
locking thè Toollbox, 2° 
volume: Programming 

with thè Toolbox; in Ita¬ 
lia però non sono ancora 
usciti e sembra che non 
debbano uscire. 

Un ultimo problema ri¬ 


guarda i linguaggi: pas¬ 
sando al Mac, pensavo di 
passare dal Basic, che per 
forza di cose era il mio 
linguaggio abituale, al 
C: ho comperato il Ker- 
ningha-Ritchie, l'ho let¬ 
to, l'ho capito. Ma è mol¬ 
to difficile pensare di 
spendere 1.200.000 lire 
per un linguaggio, pur 
completo che sia (mi rife¬ 
risco all'Aztec C in ver¬ 
sione C68K-c), che in U- 
SA costa 499$ a prezzo 
di listino. 

Su MacWorld di dicem¬ 
bre ha visto un articolo 
riguardante l’MPW' (Ma¬ 
cintosh Programmerà 
Workshop, credo della 
Apple stessa, che include 
tutto quello che può ser¬ 
vire a un programmatore 
compresi un compilatore 
Pascal e un C abbastanza 
completi) che mi ha pro¬ 
fondamente interessato: 
si sa qualcosa anche in I- 
talia dell'MPW, oppure 
per adesso rimane ancora 
del dominio dei program¬ 
mi non importati e mai 
sentiti nominare dai ri¬ 
venditori? 

Insomma: cosa posso 
fare per la documentazio¬ 
ne, e cosa per i linguag¬ 
gi? Usciranno davvero il 
Plus-Plus e l'Open Mac? 

Su una rivista francese 
che si chiama Infomag 
ho scoperto che ogni me¬ 
se c’è un articolo sulle 
ROM del Mac, o su quel¬ 
le parti del System che si 
possono cambiare con il 
ResEdit. 

Perché non fare lo stes¬ 
so su Applicando ? Non 
si potrebbe dedicare una 
piccola parte della rivista 
a questo problema? 

Alessandro * 
Levi Montalcini 
t Torino 

I testi di documentazio¬ 
ne della Apple Computer 
vengono oggi pubblicati 
dallaAddison-Wesley : tra 
questi si trovano sia i tre 
volumi di Inside Macinto¬ 


sh (disponibili separata- 
menteo in tomo unico) 
relativi al Macintosh 128 
K e 512K, che l'estensio¬ 
ne (volume IV, che com¬ 
pleta i tre precedenti) per 
Macintosh Plus. Non è e- 
seluso che tra breve un 
quinto volume compren¬ 
da le nuove routine del 
Macintosh SE, ma va te¬ 
nuto presente che quanto 
c'è di nuovo nei suoi 
256K ROM di toolbox è 
esclusivamente relativo 
allaarchitetturahardware 
prorpia dell'SE (gestione 
della tastiera e del mouse 
sull'Apple Desktop Bus, 
porta SCSI verso hard di¬ 
sk interno, eccetera). 

Tali volumi sono co¬ 
munque reperibili presso 
una qualsiasi libreria in¬ 
ternazionale, che normal¬ 
mente non manca nelle 
città universitarie. Tra le 
altre, possiamo citare la 
libreria internazionale 
Hoepli di Milano (tei. 
02/865446). Il prezzo del 
tomo di tre volumi Insi¬ 
de Macintosh si aggira in¬ 
torno alle 200mila lire (e- 
quivalenti a un centinaio 
di dollari); non siamo an¬ 
cora a conoscenza del co¬ 
sto del quarto volume. 

Lo stesso tipo di reperi¬ 
bilità si ha per i due libri 
citati e pubblicati dalla 
Hayden Books ( a proposi¬ 
to, il loro autore, Steve 
Chernicoff, è anche uno 
dei curatori di Inside Ma¬ 
cintosh). 

Ci permettiamo inoltre 
di suggerirle un terzo li¬ 
bro, “Using thè Macinto¬ 
sh Toolbox with C”, 
scritto da Jim Takatsuka, 
Fred Huxham e David 
Burnard,epubblicatodal- 
la Sybex, che ripropone 
un Inside Macintosh con 
le routine descritte con in¬ 
terfaccia C language an¬ 
ziché Pascal (cosa che in¬ 
vece fanno sia l'Inside 
Macintosh che il Macin¬ 
tosh Revealed). Il compi¬ 
latore utilizzato per crea¬ 
re gli esempi del volume 
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è quello della Consulair, 
che è sempre reperibile al¬ 
la Hoepli, e ha un prezzo 
di circa 80 mila lire. 

Per entrare più detta¬ 
gliatamente in merito al¬ 
l'ambiente di sviluppo, 
ecco alcune informazioni 
interessanti. La distribu¬ 
zione dei sistemi di svi¬ 
luppo Apple è affidata a 
una società specializzata 
di Milano, la Ulisse (via 
Pacini 22, telefono 02 
2367406). Sono loro a di¬ 
stribuire il MPW (Macin¬ 
tosh Programmer's Wor¬ 
kshop), che è costituito 
di 3 parti: l'ambiente di 
sviluppo vero e proprio 
( comprendente assem¬ 
bler, linker, resource 
compiler e altri tool di 
sviluppo), il compilatore 
C e il compilatore Pa¬ 
scal. Per maggiori detta¬ 
gli,può contattare dir eoa¬ 
mente la citata società. 

In generale esistono di¬ 
versi compilatori C (che 
è oggi il linguaggio di 
programmazione per Ma¬ 
cintosh più diffuso); ave¬ 
re un benchmark preciso 
è piuttosto difficile, an¬ 
che perchè ultimamente 
sono entrate in lizza di¬ 
verse software house con 
ottimi prodotti (si pensi 
al Lightspeed C della 
Think Technologies). Al¬ 
cune indicazioni per una 
scelta possono essere le 
seguenti: 

• Consultare, presso 
un Apple Center, l'elen¬ 
co del software Macinto¬ 
sh attualmente distribui¬ 
to (tale elenco è fornito 
dalla Apple a ogni punto 
vendita), per reperire la 
necessariadocumentazio- 
ne direttamente dall'im¬ 
portatore. 

• Far riferimento ai 
suggerimenti del servizio 
apparso su Byte del No¬ 
vembre 1985 ( u Five C 
Compiler for thè Macin¬ 
tosh”). 

• Evitare, almeno ini¬ 
zialmente, ambienti “pro¬ 
fessionali” : il C Aztec, ri¬ 


conosciuto come il mi¬ 
gliore anche dall'articolo 
di Byte prima citato, è do¬ 
tato di notevoli caratteri¬ 
stiche di velocità e com¬ 
pattezza del codice, non¬ 
ché di una serie di tool di 
sviluppo, che difficilmen¬ 
te sono indispensabili 
per chi sta apprendendo i 
rudimenti del linguaggio ; 
è perciò meglio uno stru¬ 
mento economico ma 
completo, che sicuramen¬ 
te non mancherà di essere 
valido per la sua sempli¬ 
cità. 

Un ultimissimo sugge¬ 
rimento: esiste negli Sta¬ 
ti Uniti una rivista com¬ 
pletamente dedicata allo 
sviluppo software su Ma¬ 
cintosh: si chiama Mac- 
Tutor ed è edita da Mac- 
Tutor, P.O. Box 400, 
Placentia, CA 92670 
(certo che, data la sua 
pigrizia ad abbonarsi...). 

Qualche problema 
con il II Plus 

Sono da tempo un vo¬ 
stro lettore e mi rivolgo 
a voi per la soluzione di 
alcuni problemi inerenti 
l’uso del mio Apple II 
plus. L'hardware è così 
costituito: 

1) Apple II con langua- 
ge card - Z80 e minusco¬ 
le; 

2) due drive compatibi¬ 
li; 

3) stampante Epson 
MX80 compatibile + 
scheda Grapler. 

Il materiale di cui al 
punto 3) è di recente ac¬ 
quisto (da un amico che 
stava per disfarsi del suo 
11+ per compare un IIGS) 
e, purtroppo, sulla sche¬ 
da non vi è alcuna marca 
nè identificazione. 

Il mio problema, co¬ 
munque, è il seguente: la 
scheda possiede un siste¬ 
ma di hard-copy incorpo¬ 
rato e utilizzabile median¬ 
te alcune lettere, seguito 
dal classico Esc. 

Il programma però, 
pur funzionando perfetta¬ 


mente, presenta questi 
due difetti: 

a) tra una riga e l’altra 
appare una sottile linea 
bianca; 

b) i cerchi sono forte¬ 
mente ovalizzati. 

Ho provato con varie 
sistemazioni degli swit- 
ch della stampante e del¬ 
l’interfaccia, ma i risulta¬ 
ti sono sempre identici. 

E’ possibile eliminare 
questo difetto solo in te¬ 
sto grafico; ma il dump 
di schermo, dipendendo 
dalla scheda, conserva gli 
errori di cui ai punti a) e 
b); errori, però, non dovu¬ 
ti alla stampante, che, in¬ 
terfacciata con uno Spec- 
trum, ovviamente con al¬ 
tra scheda, dà hard copy 
perfette e senza la linea 
bianca. 

Vi chiedo dunque: è 
possibile avere un pro¬ 
gramma di hard copy che 
scavalchi quello già esi- 
stentenell’interfacciaede- 
liminare, in tal modo, il 
problema? 

E vengo a un secondo 
quesito, dovuto alla mia 
ignoranza in materia di 
hardware. Ho letto che 
sul Ile esiste uno slot ag¬ 
giuntivo mancante al 
mio, che sostituisce in 
parte lo slot 3 del vec¬ 
chio Apple IL 

Poiché non riesco a tro¬ 
vare una scheda 80 colon¬ 
ne veramente funzionante 
per il mio IIplus, ma 
molte schede per il Ile 
che, viste all’apparenza, 
differiscono da quella a 
me occorrente per una 
maggiore lunghezza dello 
slot in cui vanno inseri¬ 
te, sarebbe possibile co¬ 
struirsi un adattatore pin 
to pin? 

La domanda nasce an¬ 
che dal fatto che i rivendi¬ 
tori Apple di Roma, da 
me interpellati, considera¬ 
no il IIplus un "morto” 
e, alle mie lamentele, si 
sono limitati a consigliar¬ 
mi l’acquisto di un buon 
IBM compatibile. Non 


per niente a Roma il più 
famoso rivenditore Apple 
è anche importatore di 
cloni IBM... 

Attendo vostre notizie 
e, nel frattempo vi ringra¬ 
zio per AppleDisk , l’uni¬ 
ca rivista che non mi fa 
rimpiangere di non avere 
un... Commodore. 

Carlo Branzini 
Roma 

Esaminiamo uno alla 
volta i singoli problemi. 

• Linea bianca. Le cause 
che possono generare un 
tale difetto sono sostan¬ 
zialmente due. 

1) Doppia interlinea: 
sull'interfaccia o sulla 
stampante è selezionata 
l'auto interlinea (spesso 
indicata, sui manuali in¬ 
glesi, come CR+LF o co¬ 
me Auto-LF). Occorre 
chiaramente toglierla( se¬ 
lezionando il solo CR). 
Il difetto si presenta co¬ 
me una linea bianca dello 
stesso spessore della li¬ 
nea stampata. 

2) Mancato controllo 
dell'ottavo bit: la stam¬ 
pante Epson dovrebbe uti¬ 
lizzare tutti gli otto bit 
del byte per l'interpreta¬ 
zione grafica del caratte¬ 
re. Se l'interfaccia Grap- 
pler ne invia solo 7, l'ot¬ 
tavo bit rimane sempre 
spento, generando appun¬ 
to la riga bianca di cui so¬ 
pra. In questo caso il suo 
spessore è millimetrico, 
e corrisponde alla dimen¬ 
sione di un singolo ago 
della stampante. La solu¬ 
zione in una situazione 
come questa è più ardua: 
occorre controllare sia 
sulla scheda di interfaccia 
che sulla stampante la 
possibilità di ricevere tut¬ 
ti gli 8 bit; in caso di in¬ 
successo, la soluzione 
migliore è quella di rivol¬ 
gersi al rivenditore, oppu- 
redirettamentealdistribu- 
tore italiano della scheda 
Grappler, che è la El- 
com, corso Italia, 149, 
34170 Gorizia. 
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• Cerchi ovali. Potrebbe 
provare la soluzione adot¬ 
tata per la stampante Ima- 
geWriter: è sufficiente a- 
bilitare il font a 9 caratte¬ 
ri per pollice prima della 
stampa grafica perché si 
abbia una perfetta corri- 
spondenzatraascissaeor- 
dinata. 

Si può perciò effettua¬ 
re la stessa prova con i 
font a disposizione sulla 
stampante Epson. 

• Slot 3 Apple Ile. Su 
Apple Ile esiste uno slot 
particolare definito 11 ausi¬ 
liario” : questo ha un nu¬ 
mero di piedini superiore 
a quello degli altri slot, e 
permette l'inserimento di 
alcune schede di u espan¬ 
sione sistema” : tra queste 
anche le schede video a 
80 colonne, una delle qua¬ 
li permette anche l'am¬ 
pliamento della memoria 
del Ile a 128Kb. Il sof¬ 
tware può indirizzare il 
firmware presente in que¬ 
sta scheda come se fosse 
un 'interfaccia normale in¬ 
serita nello slot 3; tutta¬ 
via il modo di accedere 
hardware alla stessa è di¬ 
verso da quello di schede 
normali. Questo spiega 
perchè non è possibile u- 
dlizzare lo slot 3 per 
schede “normali” se lo 
slot ausiliario è occupa¬ 
to. Inoltre, le differenze 
hardware tra slot ausilia¬ 
rio e normali sono tali da 
rendere purtroppo impos¬ 
sibile un adattamento per 
l'Apple II Europlus. 

Apple sì, ma 
quale scegliere? 

Orientato all’acquisto 
di un Apple, sono però 
indeciso sul modello (II 
GS, Mac, Mac Plus?). 

Ne ho bisogno per: 

- elaborazione testi 

- gestione di una bibliote¬ 
ca (1000 volumi circa) 

- grafica (bi e tridimensio¬ 
nale: proiezioni ottagona¬ 
li, prospettiva, assonome¬ 
tria; nella prospettiva 
possibilità di cambiare il 


punto di vista, operare ro¬ 
tazioni ecc.) 

- educazione (apprendi¬ 
mento lingue e linguaggi 
di programmazione, so¬ 
prattutto Basic e Logo). 

Inoltre: il monitor mo¬ 
nocromatico del Mac è 
un grosso impedimento 
per le precedenti applica¬ 
zioni? Esiste un catalogo 
software per il IIGS? 
Quale plotter scegliere? 
Ci sono associazioni di 
applisti nella mia città? 
Apple ha intenzione di in¬ 
serirsi con macchine e 
programmi nel nuovo 
piano deH'informatica del 
Ministero della pubblica 
istruzione? Perché i nuo¬ 
vi modelli non hanno a- 
dottato il sistema operati¬ 
vo MS DOS? 

Ho letto con grande in¬ 
teresse Le pagine del sof¬ 
tware e gli ultimi due nu¬ 
meri della rivista Appli¬ 
cando nella quale ho ap¬ 
prezzato la qualità tecnica 
delle vostre risposte. 

Carlo Capranico 
Torino 

La prima considerazio¬ 
ne da fare è che il softwa¬ 
re da lei cercato esiste per 
entrambi i sistemi. Natu- 
ralmentelecaratteristiche 
operative e funzionali di 
pacchetti con la stessa fi¬ 
nalità saranno diverse sui 
due sistemi, anche se, co¬ 
me potrà accorgersi, il 
software di ultima produ¬ 
zione tende a uniformar¬ 
si, su Apple II, all'inter¬ 
faccia utente del Macinto¬ 
sh (uso esteso del mou¬ 
se, grafica, icone, menù 
a cascata, eccetera). 

Dal punto di vista del- 
l'architetturahardware,il 
Macintosh è oggi la mac¬ 
china di punta della Ap¬ 
ple Computer, e questo 
sia perchè tecnologica¬ 
mente è basata su uno 
dei più potenti micropro¬ 
cessori esistenti, sia per¬ 
chè è realmente completo 
dal punto divista del sof¬ 
tware di sistema (si pensi 


che l'ultimo modello pre¬ 
sentato, Macintosh SE, 
possiede ben 256Kbyte 
di memoria ROM conte¬ 
nenti le routine per la ge¬ 
stione di base). Ciò che 
ne deriva è che, in genera¬ 
le, il software applicati¬ 
vo scritto per Macintosh 
è più potente rispetto al 
corrispondente per Apple 
II: maggiore velocità, 
maggiormente versatile, 
con più funzioni a dispo¬ 
sizione. 

Tuttavia esistono pac¬ 
chetti (come l'ottimo Ap- 
pleWorks), che sicura¬ 
mente non fanno sfigura¬ 
re Apple II; pur con le do¬ 
vute limitazioni (un e- 
sempio: su AppleWorks 
il numero di font disponi¬ 
bili in stampa è limitato 
a una decina circa, men¬ 
tre è pressoché illimitato 
su Macintosh), esso per¬ 
mette di svolgere un egre¬ 
gio lavoro, e anche alcu¬ 
ne notizie di vendita lo 
confermano (dopo alcuni 
mesi dalla sua uscita, Ap¬ 
pleWorks è risultato il 
programma più venduto 
negli Stati Uniti, lascian¬ 
do al palo pacchetti del 
calibro del Lotus 1-2-3 
per PC IBM - fonte: Info- 
World). 

Prima di concludere, ri¬ 
spondiamo brevemente ai 
suoi specifici quesiti: 

- Nonostante le dimen¬ 
sioni ridotte (il monitor 
di Macintosh è un 9"), la 
risoluzione grafica è di 
prim'ordine: 512 pixel o- 
rizzontali per342 vertica¬ 
li. Sono inoltre disponi¬ 
bili deì monitor più gran- 
diche estendono questa ri¬ 
soluzione anche a un mi¬ 
gliaio di punti sia in oriz¬ 
zontale che in verticale; 
l'unico loro neo è che 
hanno dei prezzi piutto¬ 
sto elevati (si parla di un 
minimo di 3 milioni). 

- Il software del IIGS è 
lo stesso che gira su Ap¬ 
ple Ile e Apple Ile; per 
maggiori dettagli la ri¬ 
mandiamo al numero 34 


di Applicando, dove è sta¬ 
to pubblicato un articolo 
su tale argomento. 

- Esistono oggi sul 
mercato diversissimi tipi 
di plotter, tutti con carat- 
teristiche( anchefunziona¬ 
li) diverse. La scelta del 
plotter deve essere effet¬ 
tuata in base al pacchetto 
specifico che si utilizze¬ 
rà, poiché non tutti i soft¬ 
ware supportano la stam¬ 
pa su plotter, e, tra quelli 
che lo fanno, non tutti 
supportano gli stessi tipi 
di plotter. 

- Non siamo attual¬ 
mente a conoscenza di “u- 
ser's club” a Torino; ap¬ 
profittiamo quindidell'oc¬ 
casione per lanciare un 
appello ai club di utenti 
perchèfaccianosaperedel- 
la loro esistenza. Saremo 
lieti di darne notizia su 
queste stesse pagine. 

- La Apple Computer, 
non avendo a disposizio¬ 
ne sistemi MS DOS, 
non può attualmente con¬ 
correre al Piano ministe¬ 
riale; sono però annuncia¬ 
te (e saranno tra pochissi¬ 
mo disponibili) delle 
schede di compatibilità 
con il sistema operativo 
Microsoft, sia per Apple 
II che per Macintosh. Si- 
curamentelevedremopre- 
sto anche in Italia. 

- La Apple non ha adot¬ 
tato lo standard MS DOS 
per una precisa scelta po¬ 
litica, quella cioè di esse- 
resempreall'avanguardia 
tecnologica, sia hardware 
che software. 

Questa scelta, ardua a- 
gli inizi, sembra però da¬ 
re ragione a chi tanto ha 
osato: si pensi solo ai 
tentativi del mondo MS 
DOS di “emulare” i po¬ 
tenti strumenti di Macin¬ 
tosh, fornendo i vari PC 
di mouse, di ambienti o- 
perativi a finestre (come 
il GEM o il Microsoft 
Windows), e di altri detta¬ 
gli operativi tipici dei si¬ 
stemi della casa di Cuper- 
tino. 
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annettere 


Pascal Compiler: 
come si usa? 

Vorrei sapere come fun¬ 
ziona il compilatore Pa¬ 
scal 1.1: non so cosa fare 
una volta introdotto il di¬ 
sco di lancio (posseggo 
un Apple Ile con drive e- 
sterno). 

Francesco Stasi 
Taranto 

Applicando ha iniziato 
in questi numeri una se¬ 
rie di articoli sul Pascal 
che le saranno di valido 
ausilio. Può inoltre con¬ 
sultare gli articoli di A- 
lessandro Mazzetti pub¬ 
blicati sui primi numeri 
della rivista. Una docu¬ 
mentazione più specifica, 
allapprendimento delPa- 
scal, è costituita dal libro 
“Il Pascal per l'Apple” di 
Luehrmann e Peckham 
pubblicato da Zanichelli 
(20mila lire circa). 

Bello sarebbe 
rimodernare un po' 

Posseggo un Apple Ile 
con stampante Imagewri- 
ter 132 colonne e avrei al¬ 
cune domande da porvi. 

1. Lavoro spesso con 
la doppia pagina grafica 
(con il programma Bea¬ 
gle Graphics della Beagle 
Bross) ma non so pro¬ 
prio come fare l'Hard Co¬ 
py; come posso fare? 

2. Sul manuale dell’I- 
magewriter (posseggo la 
versione in inglese) vi è 
a pagina 100 la spiegazio¬ 
ne per stampare grafici, 
ma non riesco a capire co¬ 
me bisogna inviare i dati 
alla stampante. 

3. Sono molto interes¬ 
sato al nuovo nato in ca¬ 
sa Apple, ma prima di 
cambiare il mio compu¬ 
ter vorrei sapere se sarà 
possibile installare il Co- 
boi (naturalmente senza 
dover montare la Langua- 
ge Card). E se finalmente 
la Apple cambierà il vec¬ 
chio Applesoft (perché 
sinceramente dopo aver 
lavorato con il GW-Basic 


a scuola, arrivare a casa e 
usare l’Applesoft è vera¬ 
mente tragico). 

4. Vorrei sapere qual’è 
il più vicino Apple Cen¬ 
ter al mio paese Tirano 
in provincia di Sondrio. 

Vi ringrazio per la vo¬ 
stra risposta su Applican¬ 
do , decisamente un’otti¬ 
ma rivista. 

Guido Besseghini 
Tirano (So) 

Il modo migliore per 
spedire dei dati grafici al¬ 
la stampante è quello di 
realizzare una routine as¬ 
sembler che esegua que¬ 
sto compito. Un esem¬ 
pio di buona realizzazio¬ 
ne è dato dal programma 
GF presente sul dischetto 
ImageWriter ToolKit, 
che può trovare presso i 
rivenditori Apple. 

Il Cobol richiede, oltre 
alla language card, anche 
la scheda Z80, poiché il 
compilatore funziona in 
ambiente CP/M. Tenga 
comunquepresentecheta- 
le prodotto (presentato 
sia dalla Microsoft (Co- 
bol-80) che dalla Micro 
Focus (CIS Cobol)) non 
è più commercializzato 
da tempo, e quindi potrà 
incontrare dei problemi 
di reperibilità. 

Non sono in program¬ 
ma da parte di Apple del¬ 
le modifiche al suo inter¬ 
prete; tuttavia la soluzio- 
nepotrebbeessererappre- 
sentata da una scheda di 
compatibilità MS DOS 
(prestodovrebberoarrivar- 
ne in Italia sia per Apple 
II che per Macintosh), 
che potrà rendere dispon¬ 
ile su Apple lo stesso 
GW Basic. 

Il più vicino Apple 
Center è a Erba (CO), e 
ha due sedi: via Leopardi 
16 e via Plinio 27. 

Il Pascal della 
Think Technologies 

Sono un felice abbona¬ 
to della vostra rivista che 
stimo moltissimo. Uten¬ 


te Mac da circa un anno e 
mezzo, dopo aver lavora¬ 
to con l'MS Basic ho da 
poco acquistato il Macin¬ 
tosh Pascal della Think 
Technologies. Mi rivol¬ 
go a voi per avere infor¬ 
mazioni riguardanti i tito¬ 
li e le case editrici dei ma¬ 
nuali in italiano che trat¬ 
tino la programmazione 
in Pascal nello standard u- 
sato da quello da me ac¬ 
quistato. Non so infatti 
se ad esempio Pascal, 
Guida per programmato- 
ri, McGraw-Hill, faccia 
al caso mio. Esistono 
versioni più aggiornate 
della 1.0 che sfruttino il 
nuovo finder e le possibi¬ 
lità dei nuovi dischi a 
doppia faccia? 

Paolo Barbisan 

Monastier (TV) 

Non esiste, se non in 
inglese, una guida specifi¬ 
ca per il MacPascal. Un 
libro generico sul lin¬ 
guaggio è perciò la solu¬ 
zione migliore per ap¬ 
prendere i rudimenti del 
linguaggio. Oltre al libro 
da lei citato, le consiglia¬ 
mo un volume di alfabe¬ 
tizzazione ricco di esem¬ 
pi, e, se possibile, che 
non si leghi in modo par¬ 
ticolare a una specifica 
implementazione: per e- 
sempio II Pascal per l'Ap¬ 
ple di Zanichelli o Intro¬ 
duzione al Pascal di Jac¬ 
kson, specifici per il Pa¬ 
scal UCSD di Apple II. 

Può trovare l'aggiorna¬ 
mento 2.0 del MacPascal 
presso un qualsiasi Ap¬ 
ple Center : questa versio¬ 
ne è dotato delle caratteri¬ 
stiche da lei richieste. 

Apple per 
il word processing 

Posseggo i programma 
Apple Writer a Apple 
Works e li uso frequente¬ 
mente, in special modo 
per l’elaborazione di te¬ 
sti. Ho sentito dire che è 
possibile lavorare su uno 
stesso documento con en¬ 


trambi i programmi, cioè 
che Apple Writer e Ap¬ 
ple Works possono esse¬ 
re collegati a tutto van¬ 
taggio della comodità e 
della rapidità di scrittura. 
Vorrei sapere se la cosa è 
varamente possibile. 

P. Giorgio Spagli 

S.Miniato Basso 

L'integrazione tra Ap- 
pleWorks e AppleWriter 
consiste semplicemente 
nel fatto che i documenti 
creati con un programma 
possono essere letti con 
l'altro. Unodeiprerequisi- 
ti è che AppleWriter sia 
in versione ProDOS. 

Ecco, in breve, alcune 
istruzioni. 

- Lettura di file Apple¬ 
Writer da AppleWorks. 

Creare un nuovo docu¬ 
mento Word Processor e 
specificare che si vuole 
leggere un file ASCII da 
disco. Alla richiesta del 
programma, inserire la 
pattinarne del file creato 
da AppleWriter. 

- Scrittura di file, da 
AppleWorks per Apple¬ 
Writer. 

Invece di memorizzare 
il file nel modo usuale 
del programma, scegliere 
l'opzione di stampa (Me- 
laVuota-S), e selezionare 
“file ASCII su disco ”. 

Alla richiesta del pro¬ 
gramma, digitare il pa- 
thname e il nome del file 
che si vuole memorizza¬ 
re . Questo sarà quindi leg¬ 
gibile da AppleWriter 
con le procedure usuali. 

Un'osservazioneimpor¬ 
tante: nel caso si possie¬ 
da la versione DOS 3.3 
di AppleWriter 2.0 (le re- 
lease precedenti del pro¬ 
gramma non permettono 
questo scambio), occorre 
preventivamente trasfor¬ 
mare il file nel formato 
adeguato. 

Si usa per questo il 
programma Convert pre¬ 
sente sul “Disco Utente 
ProDOS”, fornito con il 
sistema operativo. 
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LISTATI PER APPLE II 


Listato 1. Char.Ed 


10 REM - 

20 REM CHAR.ED 
30 REM BY DOUG HENNIG 
40 REM COPYRIGHT (C) 1987 

50 REM BY APPLICANDO & 

60 REM MICROSPARC, INC. 

70 REM - 

80 HIMEM: 34816 
90 ONERR GOTO 1410 
100 REM — INI ZIALIZ ZAZIONE VARIABILI — 

110 TEXT : PRINT CHR$ (4)"BLOAD NORMAL.SET": P 
RINT CHR$ (4)"BLOAD CHAR.GEN": CALL 35840: 
EF = 1 

120 IF PEEK (48896) = 76 THEN PRINT CHR$ (4) 
"PR#A$8DC1": PRINT CHR$ (4)"IN#A$8ECA" 

130 DIM CHAR(7,7),SET$(5,2):E2 = 0: IF PEEK (6 
4435) = 6 THEN E2 = 1 

140 SET = PEEK (7):TABLE = PEEK (6) + 256 * S 
ET 

150 SET$ (1/1) = CHR$ (33) + CHR$ (34) + CHR$ 

(35) + CHR$ (36) + CHR$ (37) + CHR$ (38 

) + CHR$ (39) + CHR$ (40) + CHR$ (41) + 

CHR$ (32) + CHR$ (42) + CHR$ (61) 

160 SET$(1,2) = CHR$ (49) + CHR$ (50) + CHR$ 

(51) + CHR$ (52) + CHR$ (53) + CHR$ (54 

) + CHR$ (55) + CHR$ (56) + CHR$ (57) + 

CHR$ (48) + CHR$ (58) + CHR$ (45) 

170 SET$ (2,1) = CHR$ (81) + CHR$ (87) + CHR$ 

(69) + CHR$ (82) + CHR$ (84) + CHR$ (89 
) + CHR$ (85) + CHR$ (73) + CHR$ (79) + 

CHR$ (80) + CHR$ (123) + CHR$ (125) + C 
HR$ (124) 

180 SET$ (2,2) = CHR$ (113) + CHR$ (119) + CH 

R$ (101) + CHR$ (114) + CHR$ (116) + CHR 
$ (121) + CHR$ (117) + CHR$ (105) + CHR$ 
(111) + CHR$ (112) + CHR$ (91) + CHR$ ( 

93) + CHR$ (92) 

190 SET$ (3,1) = CHR$ (65) + CHR$ (83) + CHR$ 

(68) + CHR$ (70) + CHR$ (71) + CHR$ (72 
) + CHR$ (74) + CHR$ (75) + CHR$ (76) + 

CHR$ (58) + CHR$ (34) + CHR$ (32) 

200 SET$ (3,2) = CHR$ (97) + CHR$ (115) + CHR 
$ (100) + CHR$ (102) + CHR$ (103) + CHR$ 
(104) + CHR$ (106) + CHR$ (107) + CHR$ 

(108) + CHR$ (59) + CHR$ (39) + CHR$ (32 

) 

210 SET$(4,1) = CHR$ (90) + CHR$ (88) + CHR$ 

(67) + CHR$ (86) + CHR$ (66) + CHR$ (78 

) + CHR$ (77) + CHR$ (60) + CHR$ (62) + 

CHR$ (63) 

220 SET$(4,2) = CHR$ (122) + CHR$ (120) + CH 

R$ (99) + CHR$ (118) + CHR$ (98) + CHR$ 
(110) + CHR$ (109) + CHR$ (44) + CHR$ (4 
6) + CHR$ (47) 

230 IF E2 = 0 THEN SET$(3 / 1) = LEFT$ (SET$(3,1 
1 ) , 9) + CHR$ (43) + CHR$ (32) + CHR$ (32 

) + CHR$ (32):SET$(3,2) = LEFT$ (SET$(3,2 
),10) + CHR$ (32) + CHR$ (32) + CHR$ (32 

) :SET$ (2,1) = LEFT$ (SET$ (2,1),10) + CHR$ 
(95) + CHR$ (64) + CHR$ (94) 

240 IF E2 = 1 THEN SET$(1,2) = CHR$ (49) + CH 

R$ (50) + CHR$ (51) + CHR$ (52) + CHR$ ( 

53) + CHR$ (54) + CHR$ (55) + CHR$ (56) 

+ CHR$ (57) + CHR$ (48) + CHR$ (45) + C 

HR$ (61) 

250 IF E2 = 1 THEN SET$(1,1) = CHR$ (33) + CH 

R$ (64) + CHR$ (35) + CHR$ (36) + CHR$ ( 

37) + CHR$ (94) + CHR$ (38) + CHR$ (42) 

+ CHR$ (40) + CHR$ (41) + CHR$ (95) + C 

HR$ (43) 

260 REM — CREAZIONE MENU' — 

270 HCOLOR= 3: HPLOT 0,7 TO 0,191 TO 279,191 TO 
279,7 TO 0,7: & WINDOW(l,2 TO 38,22) 

280 VTAB 10: HTAB 8: PRINT "EDITOR SET DI CARAT 
TERI": PRINT : HTAB 13: PRINT "DI DOUG HENN 
IG": HTAB 14: PRINT : HTAB 2: PRINT "(C) 19 
87 BY APPLICANDO & MICROSPARC" 

290 VTAB 22: GOSUB 1300 

300 & WINDOW(0,0 TO 39,23): & HOME : VTAB 1: I 

NVERSE : PRINT TAB( 9)"EDITOR SET DI CARAT 
TERI" TAB( 41): & WINDOW(l,2 TO 38,22): NOR 
MAL : HPLOT 0,0 TO 0,8 

310 & HOME : VTAB 5: PRINT "OPZIONI DISPONIBIL 

I :": PRINT : PRINT 

320 HTAB 8: INVERSE : PRINT "1";: NORMAL : PRIN 
T " EDIT SET DI CARATTERI": PRINT : HTAB 8: 

INVERSE : PRINT "2";: NORMAL : PRINT " SAL 
VA SET DI CARATTERI" 

330 PRINT : HTAB 8: INVERSE : PRINT "3";: NORMA 
L : PRINT " CARICA SET DI CARATTERI" 


DOS 3.3 
ProDOS 

Apple Ile 
Apple Ile 


340 


360 

370 

380 

390 

400 

410 

420 

430 

440 


460 


470 


480 


490 


500 


PRINT : HTAB 8: INVERSE : PRINT "4";: NORMA 
L : PRINT " USCITA": PRINT : HTAB 8: INVERS 
E : PRINT "5";: NORMAL : PRINT " AIUTO" 
PRINT : INVERSE : HTAB 8: PRINT "6";: NORMA 
L : PRINT " CATALOG DEL DISCO": PRINT : PRI 
NT : PRINT "FUNZIONE SCELTA: "; 

REM — CONTROLLA FUNZIONE DESIDERATA -- 
POKE 24,255: GET A$ 

KEY = ASC (A$) - 48 

ON KEY GOTO 420,820,900,850,930,1020 
GOTO 370 

REM —EDIT DEL CARATTERE — 

& HOME 

& WINDOW(1,2 TO 38,22) 

HPLOT 24,29 TO 192,29 TO 192,50 TO 24,50 TO 
24,29: FOR I = 1 TO 11:A = I * 14 + 24: HP 
LOT A,29 TO A,50: NEXT I 

HPLOT 24,53 TO 206,53 TO 206,74 TO 24,74 TO 
24,53: FOR I = 1 TO 12:A = I * 14 + 24: HP 
LOT A,53 TO A,74: NEXT I 

HPLOT 24,77 TO 164,77 TO 164,98 TO 24,98 TO 
24,77: FOR I = 1 TO 9:A = I * 14 + 24: HPL 
OT A,77 TO A,98: NEXT I: IF E2 = 1 THEN HP 
LOT 24,77 TO 178,77 TO 178,98 TO 24,98 TO 2 
4,77 

HPLOT 24,101 TO 164,101 TO 164,122 TO 24,12 
2 TO 24,101: FOR I = 1 TO 9:A = I * 14 + 24 
: HPLOT A,101 TO A,122: NEXT I: IF E2 = 1 T 
HEN HPLOT 8,101 TO 22,101 TO 22,122 TO 8,1 
22 TO 8,101 

POKE 7,SET: FOR I = 1 TO 12: VTAB 5: HTAB I 
*2 + 2: PRINT MID$ (SET$ (1,1),1,1); : VTA 
B 6: HTAB 1*2+2: PRINT MID$ (SET$(1,2) 
,1,1);: NEXT I 

FOR J = 2 TO 4: FOR I = 1 TO 13 : VTAB J * 3 
+ 2: HTAB I * 2 + 2: PRINT MID$ (SET$(J,1 
),1,1); : VTAB J * 3 + 3: HTAB 1*2 + 2: PR 
INT MID$ (SET$(J,2),1,1); : NEXT I: NEXT J 
IF E2 = 1 THEN VTAB 14: HTAB 2: PRINT CHR 
$ (126);: VTAB 15: HTAB 2: PRINT CHR$ (96) 


510 POKE 7,144: IF E2 - 0 THEN VTAB 8: HTAB 30 
: PRINT "O P N";: VTAB 9: HTAB 30: PRINT "K 
M L"; 

520 & WINDOW(1,16 TO 38,22): VTAB 17: HTAB 1: P 

RINT "CTRL-D = DUPLICA CARATTERE": PRINT "C 
TRL-S = SCAMBIA CARATTERI" 

530 PRINT "CTRL-X = CAMBIA SET DI CARATTERI": P 
RINT "CTRL-F - RITORNA AL MENU": PRINT : PR 
INT : PRINT "EDIT CARATTERE: "; 

540 VTAB 23: HTAB 17: PRINT " ";: HTAB 17: POKE 
24,0: GET CHAR$: IF CHAR$ = CHR$ (6) THEN 
& WINDOW(1,2 TO 38,22): GOTO 310 


550 

IF CHAR$ = 
40 

IF CHARS = 

CHR$ 

(13) 

OR CHAR$ = 

" " THEN 5 

560 

CHR$ 

(27) 

THEN OFF = 

- 32: GOT 

O 540 

570 

IF CHAR$ = 

CHR$ 

(4) 

THEN 630 


580 

IF CHAR$ = 

CHR$ 

(19) 

THEN 720 


590 

IF CHAR$ = 

CHR$ 

(24) 

THEN SET = 

291 - SET: 


TABLE = PEEK (6) + 256 * SET: GOTO 480 
600 IF CHAR$ < " " THEN 540 

610 CHAR$ = CHR$ ( ASC (CHAR$) + OFF):OFF = 0 
620 POKE 7,SET: PRINT CHAR$; : POKE 7,144: GOSUB 
1060: VTAB 18: HTAB 1: & CLEAR P: GOTO 52 

0 

630 & HOME : PRINT "CARATTERE DA DUPLICARE: "; 

640 GET A$: POKE 7,SET: PRINT A$: POKE 7,144:C1 
$ = A$ 

650 PRINT "CARATTERE DA DUPLICARE AL: "; 

660 GET A$: POKE 7,SET: PRINT A$: POKE 7,144:C2 
$ — A$ 

670 PRINT : PRINT "SEI SICURO (S/N)? "; 

680 POKE 24,255: GET A$: IF A$ < > "S" AND A$ 

< > CHR$ (115) AND A$ < > "N" AND A$ < 

> CHR$ (110) THEN 680 

690 POKE 24,0: IF A$ - "N" OR A$ = CHR$ (110) 
THEN 520 

700 CHAR = TABLE + 8 * ( ASC (Cl$) - 32):C « TA 

BLE + 8 * ( ASC (C2$) - 32): FOR I = 0 TO 7 

: POKE C + I, PEEK (CHAR + I): NEXT 
710 GOTO 420 

720 & HOME : PRINT "PRIMO CARATTERE DA SCAMBIA 

RE • M ■ 

730 GET A$: POKE 7,SET: PRINT A$: POKE 7,144:C1 
$ = A$ 

740 PRINT "SECONDO.CARATTERE DA SCAMBIARE: "; 
750 GET A$: POKE 7,SET: PRINT A$: POKE 7,144:C2 
$ = A$ 

760 PRINT : PRINT "SEI SICURO (S/N)? "; 

770 POKE 24,255: POKE - 16368,0: GET A$: IF A$ 
< > "S" AND A$ < > CHR$ (115) AND A$ < 

> CHR$ (110).AND A$ < > "N" THEN 770 
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780 

790 


800 

810 

820 

830 

840 

.850 


860 

870 

880 

890 

900 

910 

920 

930 

940 


950 

960 


970 


980 

990 


1000 


1010 

1020 

1030 


1040 


1050 

1060 


1070 

1080 

1090 

1100 

1110 

1120 

1130 

1140 

1150 

1160 

1170 

1180 

1190 


CHRS (110) 


BLE + 
: A = 
(C 


POKE 24,0: IF A$ = "N" OR A$ 

THEN 520 

CHAR = TABLE + 8 * ( ASC (Cl$) - 32):C = TA 

8 * ( ASC (C2$) - 32): FOR I = 0 TO 7 
PEEK (CHAR +1): POKE CHAR + I, PEEK 
I): POKE C + I,A: NEXT 
GOTO 420 

REM — MEMORIZZA SET DI CARATTERI — 

VTAB 3: HTAB 5: PRINT MEMORIZZA SET DI C 
ARATTERI -": GOSUB 1340 

PRINT CHR$ (4)"BSAVE"F$",A$9000,L$600": GO 
TO 310 

REM — ESCE DELL'EDITOR -- 

& HOME : VTAB 7: PRINT "SICURO DI VOLER US 
CIRÉ (S/N)? GET CHS : IF CHS = "S" OR CH 

$ = CHRS (115) THEN 880 

IF CHS < > "N" AND CHS < > CHR$ (110) TH 

EN PRINT CHRS (7);: GOTO 850 
GOTO 310 

PRINT : PRINT CHRS (4)"PR#0": PRINT CHRS 

(4)"IN#0": TEXT : HOME : END 

REM -- CARICA SET DI CARATTERI — 

VTAB 3: HTAB 6: PRINT CARICA SET DI CARA 
TTERI : GOSUB 1340:XX = 1 

PRINT CHRS (4)"BLOAD"F$",AS9000": GOTO 310 
REM -- ISTRUZIONI DI AIUTO — 

& HOME : & WINDOW(1,1 TO 38,22): PRINT : P 
RINT 

PRINT " Per modificare un carattere, preme 
re";: PRINT "il tasto corrispondente. Esso 
appa-": PRINT "rira 1 in inverse sulla tasti 
era, e": PRINT "verrà 1 disegnata una grigli 
a che mo-" 

PRINT "stra i pixel che lo costituiscono." 
PRINT : PRINT " Il cursore si muove sulla 
griglia": PRINT "con I-J-K-M o i tasti frec 
eia. Per": PRINT "togliere il punto indicat 
o dal curso-": PRINT "re, premere il tasto 
<Spazio>." 

PRINT : PRINT " Per eliminare le modifiche 
effettua-";: PRINT "te, premere il tasto Q 
; per mantenerle";: PRINT "premere il tasto 
<Return>." 

PRINT : GOSUB 1300: & HOME 
PRINT : PRINT : PRINT " Al termine dell'edi 
ting, si può' tor-";: PRINT "nare al menu p 
rincipale con <Ctrl>-F.": PRINT : PRINT " 

Si può' quindi salvare su disco il " 

PRINT "nuovo set premendo 2 e digitando 
": PRINT "nome del file in maiuscolo. 

INT : GOSUB 1300 

& WINDOW(0,1 TO 39,23): GOTO 310 
& WINDOW(0,1 TO 39,23) 

& HOME : VTAB 7: PRINT "CATALOG DI QUALE 
DISCO (1/2)?";: GET CH$:CH = VAL 
OKE - 16384,0: IF CH < 1 OR CH > 

10 

& HOME : PRINT : PRINT CHR$ (4) LEFT$ (" 
CATALOG",7 - 4 * ( PEEK (48896) = 76))",D" 

CH: GOSUB 1300: GOTO 310 
REM — EDIT DI UN CARATTERE — 
A=0:B=0:C=0: FOR I = 1 TO 4 : FOR J = 
1 TO 2: FOR K = 1 TO LEN (SET$(I,J)): IF 
CHARS = MID$ (SET$(I,J),K,1) THEN A = I: 

NEXT K: NEXT J: NEXT I:V1 = A * 3 + 2: IF 
B - 2 THEN VI = VI + 1 

HI = C * 2 + 2: IF CHAR$ = CHR$ (126) THE 
N VI = 14 : HI = 2 :A = 1 

IF CHAR$ = CHR$ (96) THEN VI = 15:HI = 2: 
A = 1 

IF A = 0 THEN RETURN 

VTAB VI: HTAB HI: POKE 7,SET: INVERSE : PR 
INT CHAR$; : NORMAL : POKE 7,144: & HOME 
VTAB 18: HTAB 1: PRINT : PRINT "Q = CARATT 
ERE INVARIATO": PRINT "C = PULISCE LA GRIG 
LIA": PRINT "<SPAZIO> = CAMBIA IL PIXEL": 
PRINT "<RETURN> = SALVA MODIFICHE" 

HPLOT 194,101 TO 260,101 TO 260,174 TO 194 
,174 TO 194,101 

CHAR = TABLE + 8 * { ASC (CHARS) - 32): FO 
R I = 0 TO 7 :A = PEEK (CHAR + I) 

FOR BIT = 7 TO 0 STEP - 1:B = 2 A BIT:C = 
A / B:CHAR(I,BIT) = SGN ( INT (C)):A = B 
* (C - INT (C)): NEXT BIT: NEXT I 
FOR ROW = 0 TO 7: VTAB 14 + ROW: HTAB 29: 
FOR COL = 0 TO 6:AS = ".": IF CHAR(ROW,COL 
) THEN AS = 

PRINT A$;: NEXT COL: NEXT ROW:V = 14:H » 2 
9: FOR LOOP = 0 TO 1 

VTAB V: HTAB H: POKE 24,255: POKE - 16368 
,0: GET A$ 

KEY = (AS = "I" OR A$ 


il 

PR 


(CHS): P 
2 THEN 3 


= CHR$ (11) OR A$ = "M" OR A$ 


CHR$ (10 


CHR$ (105) OR AS 


2 * (A$ = "J" OR 
CHR$ (8) OR A$ = 
OR A$ = CHR$ (21 


1200 


1210 

1220 


1230 


1240 


1250 

1260 

1270 

1280 

1290 

1300 

1310 

1320 

1330 

1340 

1350 

1360 

1370 

1380 

1390 

1400 

1410 

1420 

1430 

1440 

1450 

1460 

1470 

1480 

1490 

1500 


(13)) + 4 * (A 
+ 5 * (A$ = "Q 
(A$ « " ") : R 


V 


9) OR A$ = CHR$ (10)) 

A$ = CHR$ (106) OR A$ = 

"K" OR A$ = CHR$ (107) 

) ) 

KEY = KEY + 3 * (A$ = CHR$ 

$ = "C" OR A$ = CHR$ (99) ) 

" OR A$ = CHR$ (113)) + 6 1 
EM 1 SPAZIO 
ON KEY GOSUB 1230,1240,1250,1270,1260,1280 
LOOP = (KEY < >0): NEXT LOOP: VTAB 13: F 

OR I = 1 TO 10: HTAB 26: PRINT " 

": NEXT : RETURN : REM 10 SPAZI 

V = (V - 1) * (AS = "I" OR A$ = CHR$ (105 
) OR A$ = CHR$ (11)) + (V + 1) * (A$ = "M 
" OR A$ = CHR$ (109) OR A$ = CHRS (10)): 

21 * (V < 14) + 14 * (V > 21) + V * (V 

> = 14 AND V < =21):KEY = 0: RETURN 

H = (H - 1) * (A$ = "J" OR A$ = CHRS (106 

) OR AS = CHRS (8)) + (H + 1) * (A$ = "K" 
OR A$ = CHRS (107) OR AS = CHRS (21)}:H 
= 35 * (H < 29) + 29 * (H > 35) + H * (H 
> = 29 AND H < = 35):KEY = 0: RETURN 

FOR ROW = 0 TO 7:P = 0: FOR COL = 0 TO 7:P 
= P + CHAR(ROW,COL) * 2 A COL: NEXT COL: 
POKE CHAR + ROW,P: NEXT ROW 
VTAB VI: HTAB HI: POKE 7,SET: PRINT CHARS; 

: POKE 7,144: RETURN 

AS = ".": FOR ROW = 0 TO 7: VTAB ROW + 14: 

FOR COL = 0 TO 6: HTAB COL + 29:CHAR (ROW, 
COL) = 0: PRINT AS;: NEXT COL: NEXT ROW:KE 

Y = 0: RETURN 

A=V-14:B=H- 29:CHAR(A,B) = 1 - CHAR 
(A,B):AS = IF CHAR(A,B) THEN AS = "*" 

PRINT AS;: HTAB H:KEY = 0: RETURN 
HTAB 3: INVERSE : PRINT " PREMERE <RETURN> 
PER CONTINUARE ";: NORMAL 
A = PEEK (49152): IF A < 128 THEN 1310 
POKE 49168,0: RETURN 
REM — INPUT DI UNA STRINGA — 

VTAB 5: & CLEAR P: PRINT "NOME FILE: "F$; 

: HTAB 12 

POKE 24,255: & INPUT (A$,25): IF AS = CH 
R$ (27) OR (AS = "" AND F$ = "") THEN 310 
IF AS = "" THEN VTAB 5: HTAB 12: PRINT F$ 

: RETURN 

IF LEFTS (AS,1) < "A" OR LEFTS (AS,1) > 
"Z" THEN 1400 

FOR I = 1 TO LEN (A$):BS = MIDS (A$,I,1) 


THEN I = LEN (A$): NEXT 


HTAB 12: & CLEAR 


PEEK (219) 


256 


: IF B$ = 

OTO 1400 

NEXT :F$ = AS: RETURN 
PRINT CHRS (7): VTAB 5: 

P: GOTO 1350 
ER = PEEK (222):EL 
PEEK (218) 

PRINT CHRS (4)"CLOSE" 

IF ER = 255 THEN RÉSUMÉ 

IF NOT EF THEN TEXT : HOME : GOTO 1460 
& HOME 

VTAB 10: IF ER = 6 THEN PRINT "FILE NON T 
ROVATO": GOTO 1500 

IF ER = 8 THEN PRINT "ERRORE DI I/O": GOT 
O 1500 

IF ER = 16 THEN PRINT "SYNTAX ERROR ALLA 

LINEA "EL: GOTO 1500 

PRINT "ERRORE ALLA LINEA "EL 

VTAB 22: PRINT "<ESC> ESCE, <RETURN> CONTI 

NUA";: GET Z$: PRINT : ON Z$ = CHRS (27) 

GOTO 1510: CALL - 3288: ON EF + 1 GOTO 11 

0,310 

HOME : END 


(Fine) 


Checksum del listato 1 

APPLE CHECKER 3.0 
NOME FILE: CHAR.ED 
TIPO: A 

LUNGHEZZA: 1A94 
CHECKSUM : DF 


□ 
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o 

p 
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3 
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6 

d 

O; 

o : 


94 



















o 

B 

Q 

Q 

B 

5 
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3 

9 
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fl 

o 

Q 
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LISTATI PER APPLE II 


Listato 2. Char.Gen 


SOURCE FILE: CHAR.GEN.S 


0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 


********** 


f CHAR.GEN 

* BY DOUG HENNIG 

> COPYRIGHT (C) 1987 
r BY APPLICANDO & 

* MICROSPARC, INC. 

Ir******************** 

' TOOL KIT ASSEMBLER 
********************* 


DOS 3.3 


ProDOS 


Apple Ile 


Apple Ile 


0000 

10 

* ZERO PAGE 

LOCATI Oì 

0000 

11 

******************* 

0006 

12 

TABLEL 

EQU 

$06 

0007 

13 

TABLEH 

EQU 

$07 

0008 

14 

PTRL 

EQU 

$08 

0009 

15 

PTRH 

EQU 

$09 

0017 

16 

CMD 

EQU 

$17 

0018 

17 

LOCK 

EQU 

$18 

0019 

18 

SCRFLAG 

EQU 

$19 

00FF 

19 

TEMPLOCK EQU 

$FF 

0021 

20 

RTWINDOW EQU 

$21 

0022 

21 

WNDTOP 

EQU 

$22 

0023 

22 

WNDBTM 

EQU 

$23 

0024 

23 

CH 

EQU 

$24 

0025 

24 

CV 

EQU 

$25 

0026 

25 

GBASL 

EQU 

$26 

0027 

26 

GBASH 

EQU 

$27 

0028 

27 

BASL 

EQU 

$28 

0029 

28 

BASH 

EQU 

$29 

002A 

29 

BAS2L 

EQU 

$2A 

002B 

30 

BAS2H 

EQU 

$2B 

0032 

31 

INVFLG 

EQU 

$32 

0035 

32 

YSAV1 

EQU 

$35 

0036 

33 

CSWL 

EQU 

$36 

0037 

34 

CSWH 

EQU 

$37 

0038 

35 

KSWL 

EQU 

$38 

0039 

36 

KSWH 

EQU 

$39 

0045 

37 

ASAV 

EQU 

$45 

0046 

38 

XSAV 

EQU 

$46 

0047 

39 

YSAV 

EQU 

$47 

006F 

40 

FRETOPL 

EQU 

$6F 

0070 

41 

FRETOPH 

EQU 

$70 

0073 

42 

HIMEML 

EQU 

$73 

0074 

43 

HIMEMH 

EQU 

$74 

00B1 

44 

CHRGET 

EQU 

$B1 

00B7 

45 

CHRGOT 

EQU 

$B7 

00B8 

46 

TXTPTRL 

EQU 

$B8 

00B9 

47 

TXTPTRH 

EQU 

$B9 

00E6 

48 

HPAGE 

EQU 

$E6 

0000 

49 

******** 

***********: 

0000 

50 

^MONITOR AND 

APPLES( 

0000 

51 

******** 

★ ★ ★ ★ 

*******’ 

03EA 

52 

DOSHOOK 

EQU 

$3EA 

DD7B 

53 

FRMNUM 

EQU 

$DD7B 

DEB8 

54 

CHKCLS 

EQU 

$DEB8 

DEBB 

55 

CHKOPN 

EQU 

$DEBB 

DEBE 

56 

CHKCOM 

EQU 

$DEBE 

DEC 9 

57 

SYNTERR 

EQU 

$DEC9 

DFE3 

58 

PTRGET 

EQU 

$DFE3 

E75 2 

59 

GETADR 

EQU 

$E7 52 

F3D8 

60 

HGR2 

EQU 

$F3D8 

FC2 2 

61 

VTAB 

EQU 

$FC22 

FC2 4 

62 

VTABZ 

EQU 

$FC24 

FC5 8 

63 

HOME 

EQU 

$FC58 

FD1B 

64 

KEYIN 

EQU 

$FD1B 

FDF0 

65 

COUT1 

EQU 

$FDF0 

0000 

66 

******** 

**** 

*******’ 

0000 

67 

* MISCELLANEOUS LOCi 

0000 

68 

******** 

* * ** 

******* 7 

03F5 

69 

AMPER 

EQU 

$3F5 

BE3 2 

70 

VECTIN 

EQU 

$BE32 

BE30 

71 

VECTOUT 

EQU 

$BE30 

03F8 

72 

CTRLY 

EQU 

$3F8 

C053 

73 

PAGENUM 

EQU 

$C053 

C063 

74 

SHIFTKEY 

EQU 

$C0 63 

0000 

75 

******** 

**** 

*******■> 


*********** 


NEXT OBJECT FILE NAME IS CHAR.GEN 


8C00 : 



76 

ORG 

$8C00 


8C00 : 



77 * 




8C00:A9 

00 


78 ENTRY 

LDA 

#$00 


8C02:A0 

90 


79 

LDY 

#$90 


8C04 : 85 

06 


80 

STA 

TABLEL 

;Save ptr'to 

8C06:84 

0.7 


81 

STY 

TABLEH 

; start of char table 

8C08:A0 

8C 


82 

LDY 

# <ENTRY 

; Set CTRL-Y vector 

8C0A:8D 

F9 

03 

83 

STA 

CTRLY+1 


8C0D:8C 

FA 

03 

84 

STY 

CTRLY+2 


8C10: 85 

FF 


85 

STA 

TEMPLOCK 

;Clear capitalize next flag 

8C12 :A9 

4C 


86 

LDA 

#$4C 

;Store JMP at AMPERSAND 

8C14 :8D 

F5 

03 

87 

STA 

AMPER 

; and CTRL-Y vectors 

8C17:8D 

F8 

03 

88 

STA 

CTRLY 



Listato 3. Normal.Set 


9000.95FF 


9000- 

00 

00 

00 

00 

00 

00 

00 

00 

9008- 

08 

08 

08 

08 

08 

00 

08 

00 

9010- 

14 

14 

14 

00 

00 

00 

00 

00 

9018- 

18 

24 

04 

0E 

04 

24 

1E 

00 

9020- 

08 

3C 

0A 

1C 

28 

1E 

08 

00 

9028- 

06 

26 

10 

08 

04 

32 

30 

00 

9030- 

04 

0A 

0A 

04 

2A 

12 

2C 

00 

9038- 

08 

08 

08 

00 

00 

00 

00 

00 

9040- 

10 

08 

04 

04 

04 

08 

10 

00 

9048- 

04 

08 

10 

10 

10 

08 

04 

00 

9050- 

08 

2A 

1C 

08 

1C 

2A 

08 

00 

9058- 

00 

08 

08 

3E 

08 

08 

00 

00 

9060- 

00 

00 

00 

00 

00 

10 

10 

08 

9068- 

00 

00 

00 

3E 

00 

00 

00 

00 

9070- 

00 

00 

00 

00 

00 

00 

08 

00 

9078- 

00 

20 

10 

08 

04 

02 

00 

00 

9080- 

1C 

22 

32 

2A 

26 

22 

1C 

00 

9088- 

08 

OC 

08 

08 

08 

08 

1C 

00 

9090- 

1C 

22 

20 

18 

04 

02 

3E 

00 

9098- 

3E 

20 

10 

18 

20 

22 

1C 

00 

90A0- 

10 

18 

14 

12 

3E 

10 

10 

00 

90A8- 

3E 

02 

1E 

20 

20 

22 

1C 

00 

90B0- 

38 

04 

02 

1E 

22 

22 

1C 

00 

90B8- 

3E 

20 

10 

08 

04 

04 

04 

00 

90C0- 

1C 

22 

22 

1C 

22 

22 

1C 

00 

90C8- 

1C 

22 

22 

3C 

20 

10 

0E 

00 

90D0- 

00 

00 

08 

00 

00 

08 

00 

00 

90D8- 

00 

00 

00 

08 

00 

08 

08 

04 

90E0- 

10 

08 

04 

02 

04 

08 

10 

00 

90E8- 

00 

00 

3E 

00 

3E 

00 

00 

00 

90F0- 

04 

08 

10 

20 

10 

08 

04 

00 

90F8- 

1C 

22 

10 

08 

08 

00 

08 

00 

9100- 

18 

04 

08 

14 

08 

10 

OC 

00 

9108- 

08 

14 

22 

22 

3E 

22 

22 

00 

9110- 

1E 

22 

22 

1E 

22 

22 

1E 

00 

9118- 

1C 

22 

02 

02 

02 

22 

1C 

00 

9120- 

1E 

22 

22 

22 

22 

22 

1E 

00 

9128- 

3E 

02 

02 

1E 

02 

02 

3E 

00 

9130- 

3E 

02 

02 

1E 

02 

02 

02 

00 

9138- 

3C 

02 

02 

02 

32 

22 

3C 

00 

9140- 

22 

22 

22 

3E 

22 

22 

22 

00 

9148- 

1C 

08 

08 

08 

08 

08 

1C 

00 

9150- 

20 

20 

20 

20 

22 

22 

1C 

00 

9158- 

22 

12 

0A 

06 

0A 

12 

22 

00 

9160- 

02 

02 

02 

02 

02 

02 

7E 

00 

9168- 

22 

36 

2A 

2A 

22 

22 

22 

00 

9170- 

22 

22 

26 

2A 

32 

22 

22 

00 

9178- 

1C 

22 

22 

22 

22 

22 

1C 

00 

9180- 

1E 

22 

22 

1E 

02 

02 

02 

00 

9188- 

1C 

22 

22 

22 

2A 

12 

2C 

00 

9190- 

1E 

22 

22 

1E 

0A 

12 

22 

00 

9198- 

1C 

22 

02 

1C 

20 

22 

1C 

00 

91A0- 

3E 

08 

08 

08 

08 

08 

08 

00 

91A8- 

22 

22 

22 

22 

22 

22 

1C 

00 

91B0- 

22 

22 

22 

22 

22 

14 

08 

00 

91B8- 

22 

22 

2A 

2A 

2A 

36 

22 

00 

91C0- 

22 

22 

14 

08 

14 

22 

22 

00 

91C8- 

22 

22 

14 

08 

08 

08 

08 

00 

91D0- 

3E 

20 

10 

08 

04 

02 

3E 

00 

91D8- 

00 

08 

14 

08 

00 

00 

00 

00 

91E0- 

00 

1C 

22 

02 

22 

1C 

08 

04 

91E8- 

10 

08 

1C 

22 

3E 

02 

3C 

00 

91F0- 

08 

14 

22 

00 

00 

00 

00 

00 

91F8- 

00 

00 

00 

00 

80 

80 

FF 

00 

9200- 

04 

08 

22 

22 

22 

32 

2C 

00 

9208- 

00 

00 

1C 

20 

3C 

22 

3C 

00 

9210- 

02 

02 

1A 

26 

22 

22 

1E 

00 

9218- 

00 

00 

1C 

22 

02 

22 

1C 

00 

9220- 

20 

20 

2C 

32 

22 

22 

3C 

00 

9228- 

00 

00 

1C 

22 

3E 

02 

3C 

00 

9230- 

18 

24 

04 

0E 

04 

04 

04 

00 

9238- 

00 

00 

2C 

32 

22 

3C 

20 

1E 

9240- 

02 

02 

1A 

26 

22 

22 

22 

00 

92 48- 

08 

00 

OC 

08 

08 

08 

1C 

00 

9250- 

20 

00 

20 

20 

20 

20 

22 

1C 

9258- 

02 

02 

12 

0A 

06 

0A 

12 

00 

9260- 

OC 

08 

08 

08 

08 

08 

1C 

00 

9268- 

00 

00 

16 

2A 

2A 

2A 

2A 

00 

9270- 

00 

00 

1A 

26 

22 

22 

22 

00 

9278- 

00 

00 

1C 

22 

22 

22 

1C 

00 

9280- 

00 

00 

1E 

22 

22 

1E 

02 

02 

9288- 

00 

00 

3C 

22 

22 

3C 

20 

20 

9290- 

00 

00 

1A 

26 

02 

02 

02 

00 

9298- 

00 

00 

3C 

02 

1C 

20 

1E 

00 

92A0- 

04 

04 

1E 

04 

04 

24 

18 

00 

92A8- 

00 

00 

22 

22 

22 

32 

2C 

00 

92B0- 

00 

00 

22 

22 

14 

14 

08 

00 

92B8- 

00 

00 

2A 

2A 

2A 

2A 

14 

00 


(Continua: Listato 2. Char. Gen) 


(Continua: Listato 3. Normal. Set) 


o 

o 

I 

o 

5 

9 

o 

| 

|3 

o 

ili 

m 

ò 

8 

o 

o 

o 

o 

o 

o 

o 

o 

o 


95 
















13 

o 

0 

0 

o 

o 

o 

Q 

o 

Q 

o 

o 

I 

o 

G 

o 

o 

Q 

Q 

Q 

□ 


(Segue: Listato 2. Char. Gen) 


LISTATI PER APPLE II 


(Segue: Listato 3. Normai. Set) 


8C1A:A9 
8C1C:8D 
8C1F:8C 
8C22:AD 
8C25:C 9 
8C27:FO 
8C29:A9 
8C2B:AO 
8C2D: 8 5 
8C2F: 8 4 
8C31:A9 
8C33.-A0 
8C35:8 5 
8C37:8 4 
8C39:20 
8C3C: 20 
8C3F:A9 
8C41:8 5 
8C43:85 
8C45:4C 
8C48: 
8C48:A2 
8C4A:8 6 
8C4C:AO 
8C4E:B1 
8C50:FO 
8C52:C9 
8C54:FO 
8C56:C9 
8C58.-F0 
8C5A:DD 
8C5D:D0 
8C5F:E8 
8C60:C8 
8C 61 : DO 
8C63:E8 
8C64:BD 
8C67:D0 
8C69:E8 
8C6A:E6 
8C 6C:EO 
8C6E:DO 
8C70:4C 
8C73:BD 
8C76:D0 
8C78:18 
8C79: 98 
8C7A:65 
8C7C: 85 
8C7E:A9 
8C80: 65 
8C82:8 5 
8C84:0 6 
8C86:A6 
8C88:BD 
8C8B: 4 8 
8C8C:E8 
8C8D:BD 
8C90:4 8 
8C91:60 
8C92:57 
8C95: 44 
8C98:00 
8C99:53 
8C9C:4F 
8C9F: 00 
8CA0:50 
8CA3: 4 5 
8CA4:00 
8CA5:8 4 
8CA8:00 
8CA9:BD 
8CAA:4C 
8CAB: 00 
8CAD: 50 
8CAE: 0 0 
8CAF:8D 
8CB1:8E 
8CB3:8E 
8CB5:8C 
8CB7:8F 
8CB9:8F 
8CBB:8F 
8CBD : 
8CBD : 
8CBD : 
OOOD : 
000E : 
0050 : 
0051 : 
0083 : 
0084 : 
0085: 


48 


89 


LDA 

#>INTERPRT 

; Set AMPERSAND vector tò 











F6 

03 

90 


STA 

AMPER+1 

point to INTERPRT routine 











F7 

03 

91 


STY 

AMPER+2 


92C0- 

00 

00 

22 

14 

08 

14 

22 

00 

PI 

00 

BF 

92 


LDA 

$BFOO 

Check if ProDOS active 

92C8- 

00 

00 

22 

22 

22 

3C 

20 

1E 


4C 


93 


CMP 

#$4C 


92D0- 

00 

00 

3E 

10 

08 

04 

3E 

00 

13 


94 


BEQ 

SKIPDOS 

Yes, skip over DOS 3.3 part 

92D8- 

04 

08 

1C 

20 

3C 

22 

3C 

00 


C2 


95 


LDA 

#>CHAROUT 

Set CSW to point to new CHAROU1 

i 92E0- 

04 

08 

1C 

22 

22 

22 

1C 

00 

o 

8D 


96 


LDY 

#<CHAROUT 


92E8- 

04 

08 

1C 

22 

3E 

02 

3C 

00 

36 


97 


STA 

CSWL 


92F0- 

04 

08 

00 

OC 

08 

08 

1C 

00 

37 


98 


STY 

CSWH 


92F8- 

00 

20 

10 

08 

04 

3E 

00 

00 


CB 


99 


LDA 

#>CHARIN 

Set KSW to point to new CHARIN 

9300- 

00 

00 

00 

00 

00 

00 

00 

00 


8E 


100 


LDY 

#<CHARIN 


9308- 

36 

7F 

7F 

7F 

3E 

1C 

08 

00 


38 


101 


STA 

KSWL 


9310- 

08 

1C 

3E 

7F 

7F 

1C 

1C 

00 

Là 

39 


102 


STY 

KSWH 


9318- 

08 

1C 

08 

2A 

7F 

2A 

08 

00 


EA 

03 

103 


JSR 

DOSHOOK 

Connect I/O to DOS 

9320- 

08 

1C 

3E 

7F 

3E 

1C 

08 

00 


D8 

F3 

104 

SKIPDOS 

JSR 

HGR2 

HGR2 

9328- 

08 

1C 

2A 

08 

08 

08 

08 

00 

E 

FF 


105 


LDA 

#$FF 

Set ALPHA LOCK to ON 

9330- 

00 

10 

20 

7F 

20 

10 

00 

00 

18 


106 


STA 

LOCK 


9338- 

08 

08 

08 

08 

2A 

1C 

08 

00 

19 


107 


STA 

SCRFLAG 

Set SCROLL to ON 

9340- 

00 

04 

02 

7F 

02 

04 

00 

00 


8B 

8F 

108 


JMP 

CLRSCR 

HOME and return to caller 

9348- 

18 

24 

24 

18 

00 

00 

00 

00 

HI 



109 

★ 




9350- 

55 

2A 

55 

2A 

55 

2A 

55 

00 

00 


110 

INTERPRT LDX 

#$00 


9358- 

00 

0E 

0E 

0E 

70 

70 

70 

00 

V../ 

17 


111 


STX 

CMD 


9360- 

3E 

41 

5D 

45 

5D 

41 

3E 

00 


00 


112 

STARTCMD LDY 

#$00 


9368- 

00 

00 

3C 

02 

IF 

02 

3C 

00 


B8 


113 

GETCHAR 

LDA 

(TXTPTRL) 

;Get input char 

9370- 

3C 

44 

3C 

44 

3C 

04 

04 

00 

r\ 

21 


114 


BEQ 

DONECMD 

If EOL ($00) then found 

9378- 

22 

22 

14 

1C 

22 

22 

1C 

00 


28 


115 


CMP 

#$28 

Is it (? 

9380- 

00 

08 

00 

3E 

00 

08 

00 

00 


1D 


116 


BEQ 

DONECMD 

Yes, so see if done 

9388- 

00 

22 

14 

08 

14 

22 

00 

00 


3A 


117 


CMP 

#$3A 

Is it : ? 

9390- 

7C 

08 

10 

3C 

22 

22 

1C 

00 

ò 

19 


118 


BEQ 

DONECMD 


9398- 

10 

28 

08 

08 

08 

08 

0A 

04 

92 

8C 

119 


CMP 

CMDTABLE,X 

;Is it a cmd 

93A0- 

78 

08 

08 

08 

0A 

OD 

08 

00 

04 


120 


BNE 

NEXTCMD 

No, so try next one 

93A8- 

00 

01 

3E 

54 

14 

14 

14 

00 




121 


INX 


;Next letter in table 

93B0- 

00 

1C 

22 

22 

14 

14 

36 

00 




122 


INY 


;Next letter in input 

93B8- 

08 

1C 

2A 

2A 

2A 

1C 

08 

00 

Pi 

EB 


123 


BNE 

GE'TCHAR 


93C0- 

00 

1C 

22 

7F 

22 

1C 

00 

00 

kJ:: 



124 

NEXTCMD 

INX 


;Find next cmd in table 

93C8- 

49 

2A 

2A 

2A 

1C 

08 

08 

00 


92 

8C 

125 


LDA 

CMDTABLE,X 


93D0- 

3E 

02 

04 

08 

04 

02 

3E 

00 

mm 

FA 


126 


BNE 

NEXTCMD 

Find $00 in table 

93D8- 

00 

20 

1C 

02 

20 

1C 

02 

00 




127 


INX 



93E0- 

00 

12 

12 

12 

2E 

02 

02 

00 

Là 

17 


128 


INC 

CMD 


93E8- 

40 

3C 

0A 

08 

08 

08 

30 

00 

1D 


129 


CPX 

#CMDADDR-CMDTABLE ;At end of table? 

93F0- 

00 

4C 

52 

22 

52 

4C 

00 

00 


DC 


130 


BNE 

STARTCMD 


93F8- 

00 

20 

10 

08 

04 

3E 

00 

00 

Q 

C9 

DE 

131 

SYNTAX 

JMP 

SYNTERR 

Syntax error 

9400- 

08 

14 

22 

41 

22 

14 

08 

00 

92 

8C 

132 

DONECMD 

LDA 

CMDTABLE,X 


9408- 

00 

00 

00 

00 

00 

7F 

00 

00 

F8 


133 


BNE 

SYNTAX 

Error if not end of cmd 

9410- 

20 

20 

20 

20 

20 

20 

20 

00 




134 


CLC 


;Advance TXTPTR 

9418- 

08 

08 

08 

08 

08 

08 

08 

00 




135 


TYA 



9420- 

00 

00 

00 

7F 

00 

00 

00 

00 


B8 


136 


ADC 

TXTPTRL 


9428- 

1C 

3E 

7F 

7F 

7F 

3E 

1C 

00 

Là 

B8 


137 


STA 

TXTPTRL 


9430- 

00 

00 

7F 

00 

00 

00 

00 

00 


00 


138 


LDA 

#$00 


9438- 

00 

7F 

00 

00 

00 

00 

00 

00 


B9 


139 


ADC 

TXTPTRH 


9440- 

7F 

00 

00 

00 

00 

00 

00 

00 


B9. 


140 


STA 

TXTPTRH 


9448- 

07 

07 

07 

00 

00 

00 

00 

00 

o 

17 


141 


ASL 

CMD 

Since 2 bytes/addr 

9450- 

00 

00 

00 

00 

07 

07 

07 

00 


17 


142 


LDX 

CMD 


9458- 

08 

08 

08 

0F 

00 

00 

00 

00 


AF 

8C 

143 


LDA 

CMDADDR, X ; 

Get high byte 

9460- 

08 

08 

08 

78 

00 

00 

00 

00 

fi 



144 


PHA 


; Save for RTS 

9468- 

00 

00 

00 

7F 

08 

08 

08 

08 



145 


INX 



9470- 

40 

40 

40 

40 

40 

40 

40 

00 


AF 

8C 

146 


LDA 

CMDADDR, X ; 

Get low byte 

9478- 

00 

00 

00 

00 

70 

70 

70 

00 




147 


PHA 



9480- 

70 

70 

70 

00 

00 

00 

00 

00 




148 


RTS 



9488- 

41 

22 

14 

08 

14 

22 

41 

00 

Ài 

49 

4E 

149 

CMDTABLE DFB 

$57,$49,$4E 

,$44,$4F,$57 ;’WINDOW 

9490- 

7F 

00 

7F 

00 

7F 

00 

7F 

00 

Là 

4F 

57 






9498- 

00 

00 

00 

00 

7F 

00 

00 

00 




150 


DFB 

$00 


94A0- 

55 

55 

55 

55 

55 

55 

55 

00 


43 

52 

151 


DFB 

$53,$43,$52 

,$4F,$4C,$4C SCROLL' 

94A8- 

00 

00 

00 

78 

08 

08 

08 

08 

DI 

4C 

4C 






94B0- 

10 

10 

10 

10 

10 

10 

10 

00 



152 


DFB 

$00 


94B8- 

1C 

22 

55 

41 

5D 

22 

1C 

00 

41 

47 

153 


DFB 

$50,$41,$47 

,$45 ;'PAGE' 

94C0- 

04 

04 

04 

04 

04 

04 

04 

00 









94C8- 

00 

00 

00 

0F 

08 

08 

08 

08 




154 


DFB 

$00 


94D0- 

02 

02 

02 

02 

02 

02 

02 

00 

pf 

00 

97 

155 


DFB 

$84,$00,$97 

,$00 ;INPUT,HOME 

94D8- 

30 

08 

08 

06 

08 

08 

30 

00 

Là 








94E0- 

40 

20 

7F 

08 

7F 

02 

01 

00 




156 


DFB 

$BD 


94E8- 

04 

08 

08 

10 

08 

08 

04 

00 




157 


DFB 

$4C 

CLEAR L 

94F0- 

10 

08 

08 

04 

08 

08 

10 

00 

mm 

BD 


158 


DFB 

$00,$BD 


94F8- 

08 

08 

1C 

1C 

1C 

3E 

7F 

00 




159 


DFB 

$50 

CLEAR P 

9500- 

80 

00 

BF 

Al 

21 

Al 

3F 

80 




160 


DFB 

$00 


9508- 

00 

00 

00 

00 

00 

00 

7F 

00 


4E 


161 

CMDADDR 

DDB 

WINDOW-1 


9510- 

IF 

IF 

IF 

IF 

IF 

IF 

IF 

00 

pi 

4D 


162 


DDB 

SCRSWTCH-1 


9518- 

07 

07 

07 

07 

07 

07 

07 

00 


9F 


163 


DDB 

PAGE-1 


9520- 

00 

00 

00 

00 

7F 

7F 

7F 

00 

'V,-H 1 

BC 


1 64 


DDB 

INPUT-1 


9528- 

01 

03 

07 

0F 

IF 

3F 

7F 

00 


8A 


165 


DDB 

CLRSCR-1 


9530- 

00 

00 

00 

7 F 

7F 

7F 

7F 

00 


76 


166 


DDB 

CLEOL-1 


9538- 

00 

00 

7F 

7F 

7F 

7F 

7F 

00 

Pi 

90 


167 


DDB 

CLEOP-1 


9540- 

00 

7F 

7F 

7F 

7F 

7F 

7F 

00 

Là 



1 68 

★ 




9548- 

7F 

3E 

1C 

1C 

1C 

08 

08 

00 




169 

* — ADDRESSES — * 


9550- 

7F 

7F 

7F 

7F 

7F 

7F 

7F 

00 




170 

* 




9558- 

08 

08 

08 

08 

08 

08 

08 

00 

JJ 



171 

CHARAC 

EQU 

$0D 


9560- 

00 

00 

00 

7F 

00 

00 

00 

00 



172 

ENDCHAR 

EQU 

$0E 


9568- 

08 

08 

08 

7F 

00 

00 

00 

00 



173 

LINNUML 

EQU 

$50 


9570- 

3F 

3F 

3F 

3F 

3F 

3F 

3F 

óo 




174 

LINNUMH 

EQU 

$51 


9578- 

01 

03 

IF 

7 F 

IF 

03 

01 

00 

H 



175 

TXTSAVL 

EQU 

$83 


9580- 

00 

38 

38 

38 

07 

07 

07 

00 



176 

TXTSAVH 

EQU 

$84 


9588- 

7E 

42 

42 

42 

42 

42 

7E 

oo : 



177 

FORPTRL 

EQU 

$85 













(Continua: Listato 2. Char. Gen) 


(Continua: Listato 3. Normal. Set) 


DI 


Di 


96 

















□ 

o 

d 

fi 

fi 

0 

3 

a: 

a 

o 

o 

fi 

a 

d 

o 

o 

0 : 

o 

o: 

o 


(Segue: Listato 2. Char. Gen) 


LISTATI PER APPLE 


(Segue: Listato 3. Normal. Set) 


0086: 



178 

FORPTRH 

EQU 

$86 











0200: 



179 

BUFFER 

EQU 

$200 











E3ED : 



180 

STRLT2 

EQU 

$E3ED 


9590- 

7F 

3F 

1F 

OF 

07 

03 

01 

00 

•E73D: 



181 

TXTLT2 

EQU 

$E73D 


9598- 

00 

00 

00 

00 

00 

7F 

7F 

00 

DA7B : 



182 

LET2 

EQU 

$DA7B 


95A0- 

7F 

7E 

7C 

78 

70 

60 

40 

00 

FDOC: 



183 

RDKEY 

EQU 

$FD0C 


95A8- 

40 

60 

7C 

7F 

7C 

60 

40 

00 

FDED : 



184 

COUT 

EQU 

$FDED 


95B0- 

0F 

0F 

OF 

OF 

OF 

OF 

OF 

00 

8CBD : 



185 

★ 




95B8- 

00 

00 

7E 

42 

42 

42 

7E 

00 

8CBD : 



186 

* — INPUT ROUTINE -- 

* 

95C0- 

03 

03 

03 

03 

03 

03 

03 

00 

8CBD : 



187 

* 




95C8- 

40 

60 

70 

78 

7C 

7E 

7F 

00 

8CBD:20 

BB 

DE 

188 

INPUT 

JSR 

CHKOPN 

;Is it (? 

95D0- 

01 

01 

01 

01 

01 

01 

01 

00 

8CC0:20 

E3 

DF 

189 


JSR 

PTRGET 

;Find string 

95D8- 

00 

3C 

24 

24 

24 

3C 

3C 

00 

8CC3:85 

85 


190 


STA 

FORPTRL 

; Save addr of string 

95E0- 

3F 

21 

21 

21 

21 

21 

3F 

00 

8CC5:84 

86 


191 


STY 

FORPTRH 


95E8- 

22 

3E 

22 

22 

22 

22 

3E 

00 

8CC7:20 

BE 

DE 

192 


JSR 

CHKCOM 


95F0- 

21 

21 

21 

3F 

OC 

OC 

1E 

00 

8CCA:20 

7B 

DD 

193 


JSR 

FRMNUM 


95F8- 

6F 

75 

20 

64 

75 

6D 

6D 

79 

8CCD: 20 

52 

E7 

194 


JSR 

GETADR 

;Get MAXLEN into LINNUML 

* 









8CD0:20 

B8 

DE 

195 


JSR 

CHKCLS 

;Is there a )? 










8CD3:A5 

B8 


196 


LDA 

TXTPTRL 








{r ine ) 

8CD5: A4 

B9 


197 


LDY 

TXTPTRH 












8CD9: 84 84 
8CDB:A2 00 
8CDD: 86 46 
8CDF: 20 OC FD 
8CE2:C9 
8CE4:FO 
8CE6:C9 
8CE8:FO 
8CEA:C9 
8CEC:BO 
8CEE:C9 
8CF0:BO 
8CF2:E4 
8CF4:FO 
8CF6:20 


8CF9:A6 
8CFB:29 
8CFD:9D 
8D00:E8 
8D01: DO 
8D03:FO 
8D0 5 :A6 
8D07:FO 
8009:20 
8D0C:CA 
8D0D: 38 
8D0E:BO 
8D10:E4 
8012:FO 
8D14 : A4 
8D16 :B1 
8D18:20 
8D1B:29 
8D1D:9D 
8D20:E8 
8D21: DO 
8D23:C9 
8D25:FO 
8027:29 
8D2 9:9D 
8D2C:E8 
8D2D:A9 
8D2F:20 
8D32:A9 
8D34:9D 
8D37:85 
8D39:85 
8D3B:AO 
8D3D: 20 
8D40:20 
8D43:20 
8D4 6 :A5 
8D4 8 : A4 
8D4A:85 
8D4C: 84 
8D4E:60 
8D4F : 
8D4F : 
8D4F : 
0020: 
D412 : 
E74 6 : 
8D4F: 
8D4F : 
8D4F : 
8D4F:20 
8D52: 20 
8D5 5 :A5 
8D57:C9 
8D5 9 :BO 
8D5B:EO 
8D5D:BO 


198 

199 STY 

200 LDX 

201 SAVEPTR STX 

202 GETCHR JSR 


95 

2A 

88 

1B 

AO 

04 

80 

31 

50 

E9 

ED FD 


203 

204 

205 

206 

207 

208 

209 

210 
211 
212 


CMP 

BEQ 

CMP 

BEQ 

CMP 

BCS 

CMP 

BCS 

CPX 


TXTSAVL 

TXTSAVH 

#$00 

XSAV 

RDKEY 

#$95 

FORWARD 

#$88 

BACKWARD 
# $A0 
CHAR 
#$80 
DONE 
LINNUML 
GETCHR 


? Zero char index 


;Is it ->? 

;Yes, so do it 
;Is it <-? 

/Yes, so do it 
;Is it CTRL char? 
; No 

; CTRL char? 

; Yes 

;Have MAX chars? 


46 

7F 

00 02 

DA 

1E 

46 

D6 

ED FD 


CD 

50 

CB 

24 

28 

ED FD 
7F 

00 02 

BA 

8D 

08 

7F 

00 02 
8D 

ED FD 
00 

00 02 
OD 
OE 
02 

ED E3 
3D E7 
7B DA 

83 

84 
B8 
B9 


BB DE 

46 E7 

50 

28 

53 

19 

4 F 


213 


JSR 

COUT 

;Print char 

Listato 4. 







214 


LDX 

XSAV 

;Restore char ptr 










215 


AND 

#$7F 

;Mask out high bit 

scientmc.set 






216 


STA 

BUFFER,X 

;Store char 










217 


INX 


;Next char 

9000. 

95FF 







218 


BNE 

SAVEPTR 

;Get next char 










219 


BEQ 

DONE 

;If buffer full, done 

9000- 

00 

00 

00 

00 

• 00 

00 

00 

00 

220 

BACKWARD LDX 

XSAV 

; Check char ptr 

9008- 

08 

08 

08 

08 

08 

00 

08 

00 

221 


BEQ 

GETCHR 

;Ignore if no chars entered 

9010- 

14 

14 

14 

00 

00 

00 

00 

00 

222 


JSR 

COUT 

;Otherwise, backspace 

9018- 

14 

14 

3E 

14 

3E 

14 

14 

00 

223 


DEX 


;One less char 

9020- 

08 

3C 

0A 

1C 

28 

1E 

08 

00 

224 


SEC 



9028- 

06 

26 

10 

08 

04 

32 

30 

00 

225 


BCS 

SAVEPTR 

;Get next char 

9030- 

04 

0A 

0A 

04 

2A 

12 

2C 

00 

226 

FORWARD 

CPX 

LINNUML 

;Have MAX chars? 

9038- 

08 

08 

08 

00 

00 

00 

00 

00 

227 


BEQ 

GETCHR 


9040- 

10 

08 

04 

04 

04 

08 

10 

00 

228 


LDY 

CH 

;Get curr cursor posn 

9048- 

04 

08 

10 

10 

10 

08 

04 

00 

229 


LDA 

(BASL),Y 

;Get char on screen 

9050- 

08 

2A 

1C 

08 

1C 

2A 

08 

00 

230 


JSR 

COUT 

;Print it 

9058- 

00 

08 

08 

3E 

08 

08 

00 

00 

231 


AND 

#$7F 


9060- 

00 

00 

00 

00 

00 

10 

10 

08 

232 


STA 

BUFFER,X 

; Save it 

9068- 

00 

00 

00 

3E 

00 

00 

00 

00 

233 


INX 


;One more char 

9070- 

00 

00 

00 

00 

00 

00 

08 

00 

234 


BNE 

SAVEPTR 


9078- 

00 

20 

10 

08 

04 

02 

00 

00 

235 

DONE 

CMP 

# $8D 

; RETURN? 

9080- 

1C 

22 

32 

2A 

26 

22 

1C 

00 

236 


BEQ 

STORE 

;Yes, so don't save it 

9088- 

08 

OC 

08 

08 

08 

08 

1C 

00 

237 


AND 

#$7F 

;No, so save it 

9090- 

1C 

22 

20 

18 

04 

02 

3E 

00 

238 


STA 

BUFFER,X 


9098- 

3E 

20 

10 

18 

20 

22 

1C 

00 

239 


INX 



90A0- 

10 

18 

14 

12 

3E 

10 

10 

00 

240 


LDA 

# $8D 

; Simulate RETURN 

90A8- 

3E 

02 

1E 

20 

20 

22 

1C 

00 

241 

STORE 

JSR 

COUT 


90B0- 

38 

04 

02 

1E 

22 

22 

1C 

00 

242 


LDA 

, #$00 

;Last char is 00 

90B8- 

3E 

20 

10 

08 

04 

04 

04 

00 

243 


STA 

BUFFER,X 

/Zero end of input 

90C0- 

1C 

22 

22 

1C 

22 

22 

1C 

00 

24 4 


STA 

CHARAC 

/End char for STRLT2 

90C8- 

1C 

22 

22 

3C 

20 

10 

0E 

00 

245 


STA 

ENDCHAR 


90D0- 

00 

00 

08 

00 

00 

08 

00 

00 

246 


LDY 

# <BUFFER 

/Get locn of input 

90D8- 

00 

00 

00 

08 

00 

08 

08 

04 

247 


JSR 

STRLT2 

/Put input string 

90E0- 

10 

08 

04 

02 

04 

08 

10 

00 

248 


JSR 

TXTLT2 

/ into memory 

90E8- 

00 

00 

3E 

00 

3E 

00 

00 

00 

249 


JSR 

LET2 


90F0- 

04 

08 

10 

20 

10 

08 

04 

00 

250 


LDA 

TXTSAVL 


90F8- 

1C 

22 

10 

08 

08 

00 

08 

00 

251 


LDY 

TXTSAVH 


9100- 

1C 

22 

2A 

3A 

1A 

02 

3C 

00 

252 


STA 

TXTPTRL 

/Restore TXTPTR 

9108- 

08 

14 

22 

22 

3E 

22 

22 

00 

253 


STY 

TXTPTRH 


9110- 

1E 

22 

22 

1E 

22 

22 

1E 

00 

254 


RTS 



9118- 

1C 

22 

02 

02 

02 

22 

1C 

00 

255 

* 




9120- 

1E 

22 

22 

22 

22 

22 

1E 

00 

256 

* — ADDRESSES — * 


9128- 

3E 

02 

02 

1E 

02 

02 

3E 

00 

257 

* 




9130- 

3E 

02 

02 

1E 

02 

02 

02 

00 

258 

WNDLFT 

EQU 

$20 


9138- 

3C 

02 

02 

02 

32 

22 

3C 

00 

259 

PRNTERR 

EQU 

$D412 


9140- 

22 

22 

22 

3E 

22 

22 

22 

00 

260 

GETNUM 

EQU 

$E746 


9148- 

1C 

08 

08 

08 

08 

08 

1C 

00 

261 

*' 




9150- 

20 

20 

20 

20 

22 

22 

1C 

00 

262 

* — WINDOW 

SET — * 


9158- 

22 

12 

0A 

06 

0A 

12 

22 

00 

263 

* 




9160- 

02 

02 

02 

02 

02 

02 

7E 

00 

264 

WINDOW 

JSR 

CHKOPN 

/Is it (? 

9168- 

22 

36 

2 A 

2A 

22 

22 

22 

00 

265 


JSR 

GETNUM 

/Get A,X 

9170- 

22 

22 

26 

2A 

32 

22 

22 

00 

266 


LDA 

LINNUML 

/Get LEFT 

9178- 

1C 

22 

22 

22 

22 

22 

1C 

00 

267 


CMP 

#$28 

/Check range 

9180- 

1E 

22 

22 

1E 

02 

02 

02 

00 

268 


BCS 

ERR 


9188- 

1C 

22 

22 

22 

2A 

12 

2C 

00 

269 


CPX 

#$19 

/Check TOP range 

9190- 

1E 

22 

22 

1E 

0A 

12 

22 

00 

270 


BCS 

ERR 


9198- 

1C 

22 

02 

1C 

20 

22 

1C 

00 


Checksum del listato 3 

APPLE CHECKER 3.0 
NOME FILE: NORMAL.SET 
TIPO: B 

LUNGHEZZA: 0600 
CHECKSUM : 01 


(Continua: Listalo 2. Char. Gen) 


(Continua: Listato 4. Scientific. Set) 


□ 

D 

SS 

3 

fi 

fi 

o 

fi 

o 

fi 

o 

d 

fi 

6 

n 

fi 

fi 

O 

D 

B 

o 

O 

fi: 


97 






















Ej 

(Segue: 

Listato 2. Char. Gen) 

LISTATI PER APPLE II (Segue: Listato 4. Scientifìc. 

Set) 

o 

8D5F: 85 

20 


271 


STA 

WNDLFT 

; Set WNDLFT ' 

91A0- 3E 

08 

08 

08 

08 

08 

08 

00 

0 

8D 61: 8 6 

22 


272 


STX 

WNDTOP 

; Set WNDTOP 

91A8- 22 

22 

22 

22 

22 

22 

1C 

00 

ili 

8D63: 20 

B7 

00 

273 


JSR 

CHRGOT 

;Get char 

91B0- 22 

22 

22 

22 

22 

14 

08 

00 

8D66:C9 

CI 


274 


CMP 

#$C1 

;TO? 

91B8- 22 

22 

2A 

2A 

2A 

36 

22 

00 


8D68:D0 

44 


275 


BNE 

ERR 


91C0- 22 

22 

14 

08 

14 

22 

22 

00 



8D6A:20 

Bl 

00 

276 


JSR 

CHRGET 

;Skip "TO" 

91C8- 22 

22 

14 

08 

08 

08 

08 

00 


Q 

8D6D: 20 

46 

E7 

277 


JSR 

GETNUM 


91D0- 3E 

20 

10 

08 

04 

02 

3E 

00 

o 

8D70:20 

B8 

DE 

278 


JSR 

CHKCLS 

;Is there a )? 

91D8- 3E 

06 

06 

06 

06 

06 

3E 

00 

8D73:A5 

50 


279 


LDA 

LINNUML 

;Get BTM 

91E0- 00 

02 

04 

08 

10 

20 

00 

00 


8D75:C9 

28 


280 


CMP 

#$28 

; Check range 

91E8- 3E 

30 

30 

30 

30 

30 

3E 

00 



8D77:B0 

35 


281 


BCS 

ERR 


91F0- 08 

14 

22 

00 

00 

00 

00 

00 

B 

o 

8D79:38 



282 


SEC 


;WIDTH=RIGHT-LEFT+1 

91F8- 00 

00 

00 

00 

00 

00 

7F 

00 


8D7A:E5 

20 


283 


SBC 

WNDLFT 


9200- 08 

10 

20 

00 

00 

00 

00 

00 


8D7C:90 

30 


284 


BCC 

ERR 


9208- 00 

00 

1C 

20 

3C 

22 

3C 

00 


fl 

8D7E: 85 

21 


285 


STA 

RTWINDOW 


9210- 02 

02 

1A 

26 

22 

22 

1E 

00 


8D80:E6 

21 


286 


INC 

RTWINDOW 


9218- 00 

00 

1C 

22 

02 

22 

1C 

00 

1 

8D82:E0 

18 


2 87 


CPX 

#$18 

;ChecK RIGHT range 

9220- 20 

20 

2C 

32 

22 

22 

3C 

00 

8D84:B0 

28 


288 


BCS 

ERR 


9228- 00 

00 

1C 

22 

3E 

02 

3C 

00 


8D86:E8 



289 


INX 



9230- 18 

24 

04 

0E 

04 

04 

04 

00 


O 

8D87:8 6 

23 


290 


STX 

WNDBTM 

/ Set WNDBTM 

9238- 00 

00 

2C 

32 

22 

3C 

20 

1E 

il 

8D89:A5 

20 


2 91 


LDA 

WNDLFT 

; Check CH 

9240- 02 

02 

1A 

26 

22 

22 

22 

00 

8D8B:C5 

24 


292 


CMP 

CH 

; Inside window? 

9248- 08 

00 

OC 

08 

08 

08 

1C 

00 


8D8D: 90 

04 


293 


BCC 

CK1 


9250- 20 

00 

20 

20 

20 

20 

22 

1C 


a 

8D8F: 85 

24 


294 


STA 

CH 


9258- 02 

02 

12 

0A 

06 

0A 

12 

00 

ó 

8D91:B0 

09 


295 


BCS 

CK2 


9260- OC 

08 

08 

08 

08 

08 

1C 

00 

8D93:18 



296 

CK1 

CLC 


; Check again 

9268- 00 

00 

16 

2A 

2A 

2A 

2A 

00 


8D94: 65 

21 


297 


ADC 

RTWINDOW 


9270- 00 

00 

1A 

26 

22 

22 

2 2 

00 



8D96:C5 

24 


298 


CMP 

CH 


9278- 00 

00 

1C 

22 

22 

22 

1C 

00 


o 

8D98:B0 

02 


299 


BCS 

CK2 


9280- 00 

00 

1E 

22 

22 

1E 

02 

02 

G 

8D9A: 8 5 

24 


300 


STA 

CH 


9288- 00 

00 

3C 

22 

22 

3C 

20 

20 

8D9C:A5 

22 


301 

CK2 

LDA 

WNDTOP 

/Check CV 

9290- 00 

00 

1A 

26 

02 

02 

02 

00 


8D9E:C5 

25 


302 


CMP 

CV 

/Inside window? 

9298- 00 

00 

3C 

02 

1C 

20 

1E 

00 



8DA0: 90 

03 


303 


BCC 

CK3 


92A0- 04 

04 

1E 

04 

04 

24 

18 

00 

p 

o 

8DA2:85 

25 


304 


STA 

CV 


92A8- 00 

00 

22 

22 

22 

32 

2C 

00 


8DA4: 60 



305 


RTS 



92B0- 00 

00 

22 

22 

14 

14 

08 

00 


8DA5:A5 

23 


306 

CK3 

LDA 

WNDBTM 

/Check again 

92B8- 00 

00 

2A 

2A 

2A 

2A 

14 

00 


ó. 

8DA7:C5 

25 


307 


CMP 

CV 


92C0- 00 

00 

22 

14 

08 

•14 

22 

00 

;o 

8DA9:B0 

02 


308 


BCS 

DONESET 


92C8- 00 

00 

22 

22 

22 

3C 

20 

1E 

8DAB:85 

25 


309 


STA 

CV 


92D0- 00 

00 

3E 

10 

08 

04 

3E 

00 


8DAD:60 



310 

DONESET 

RTS 



92D8- 08 

04 

04 

02 

04 

04 

08 

00 



8DAE:A9 

00 


311 

ERR 

LDA 

#$00 

/Restore text window 

92E0- 08 

08 

08 

08 

08 

08 

08 

00 


a 

8DB0:8 5 

20 


312 


STA 

WNDLFT 


92E8- 08 

10 

10 

20 

10 

10 

08 

00 

li 

8DB2:8 5 

22 


313 


STA 

WNDTOP 


92F0- 00 

26 

19 

00 

00 

00 

00 

00 

8DB4:A9 

28 


314 


LDA 

#$28 


92F8- 00 

20 

10 

08 

04 

3E 

00 

00 


8DB6:8 5 

21 


315 


STA 

RTWINDOW 


..£300- 00 

00 

00 

00 

00 

00 

00 

00 


Q 

8DB8-.A9 

18 


316 


LDA 

#$18 


9308- 36 

7F 

7F 

7F 

3E 

1C 

08 

00 

o 

8DBA:85 

23 


317 


STA 

WNDBTM 


9310- 08 

1C 

3E 

7F 

7F 

1C 

1C 

00 

8DBC:A2 

35 


318 


LDX 

#$35 

/ILLEGAL QTY ERROR 

9318- 08 

1C 

08 

2A 

7 F 

2A 

08 

00 


8DBE:4C 

12 

D4 

319 


JMP 

PRNTERR 


9320- 08 

1C 

3E 

7F 

3E 

1C 

08 

00 



8DC1 : 



320 

★ 




9328- 00 

00 

00 

00 

07 

07 

07 

00 

B 

0 

8DC1:D8 



321 




CLD 

9330- 08 

08 

08 

0F 

00 

00 

00 

00 

8DC2:8 6 

46 


322 

CHAROUT 

STX 

XSAV 

/Save registers 

9338- 08 

08 

08 

78 

00 

00 

00 

00 

8DC4: 84 

4-7 


323 


STY 

YSAV 


9340- 00 

0E 

0E 

0E 

70 

70 

70 

00 


8DC6: 4 8 



324 


PHA 



9348- 00 

00 

00 

0F 

08 

08 

08 

08 


| 

8DC7:C9 

8D 


325 


CMP 

#$8D 

/If char <> CR, 

9350- 55 

2A 

55 

2A 

55 

2A 

55 

00 

B 

8DC9: DO 

0A 


326 


BNE 

OUTPUT 

/ plot it 

9358- 00 

04 

02 

7F 

02 

04 

00 

00 

8DCB:A9 

FF 


327 


LDA 

#$FF 

/Reset to NORMAL mode 

9360- 00 

00 

04 

6B 

10 

00 

00 

00 


8DCD: 85 

32 


328 


STA 

INVFLG 


9368- 01 

03 

07 

0F 

IF 

3F 

7F 

00 



8DCF: 20 

77 

8F 

329 


JSR 

CLEOL 

/CLEOL 

-9370- 00 

0F 

71 

il 

11 

71 

0F 

00 

1 

o 

8DD2:18 



330 


CLC 



9378- 04 

0F 

14 

64 

14 

0F 

04 

00 


8DD3: 90 

OD 


331 


BCC 

CHKSCR 

/Check if need to scroll 

9380- 1C 

22 

55 

41 

5D 

22 

1C 

00 


8DD5:20 

55 

8E 

332 

OUTPUT 

JSR 

PLOTCHAR 

/Plot char 

9388- 41 

22 

14 

08 

14 

22 

41 

00 



8DD8:18 



333 


CLC 



9390- 00 

00 

00 

00 

7F 

7F 

7F 

00 


o 

8DD9-.A5 

24 


334 


LDA 

CH 

/Check if at eoi 

9398- 10 

10 

10 

10 

10 

10 

10 

00 

0 

8DDB:69 

01 


335 


ADC 

#$01 


93A0- 20 

20 

20 

20 

20 

20 

20 

00 

8DDD:C5 

21 


336 


CMP 

RTWINDOW 

/At eoi? 

93A8- 00 

38 

38 

38 

07 

07 

07 

00 


8DDF: DO 

OC 


337 


BNE 

RETCHAR 

/No, so continue 

93^0- 00 

00 

00 

0F 

08 

08 

08 

08 


|: 

8DE1:18 



338 


CLC 


/Yes, so see if at eop 

93B8- 00 

00 

00 

78 

08 

08 

08 

08 


8DE2:A5 

25 


339 

CHKSCR 

LDA 

CV 


93C0- 00 

7F 

7F 

7F 

7F 

7F 

7F 

00 

o 

8DE4: 6 9 

01 


340 


ADC 

#$01 


93C8- 40 

60 

70 

78 

7C 

7E 

7F 

00 



8DE6:C5 

23 


341 


CMP 

WNDBTM 

/At bottom of screen? 

93D0- 00 

00 

00 

00 

7F 

00 

00 

00 


D 

8DE8: DO 

03 


342 


BNE 

RETCHAR 

/No, so continue 

93D8- 08 

08 

08 

08 

08 

08 

08 

08 

o 

8DEA: 20 

F5 

8D 

343 


JSR 

SCROLL 

/Yes, so scroll up one line 

93E0- 08 

08 

7F 

00 

3E 

49 

08 

00 

8DED:A4 

47 


344 

RETCHAR 

LDY 

YSAV 

/Restore 

93E8- 7F 

7E 

7 C 

78 

70 

60 

40 

00 

8DEF:A6 

46 


345 


LDX 

XSAV 

/ registers 

93F0- 24 

14 

14 

77 

14 

14 

24 

00 



8DF1: 68 



346 


PLA 


/ and 

93F8- 1C 

27 

24 

64 

24 

27 

1C 

00 


mm 

8DF2:4C 

F0 

FD 

347 


JMP 

C0UT1 

/ return 

9400- 08 

14 

22 

41 

22 

14 

08 

00 

ò 

lì 

8DF5 : 



348 

* 




9408- 04 

14 

14 

77 

14 

14 

04 

00 

v^v 

8DF5:24 

19 


349 

SCROLL 

BIT 

SCRFLAG 

/Check if scroll active or not 

9410- 02 

06 

0A 

73 

0A 

06 

02 

00 


8DF7:10 

4A 


350 


BPL 

NOSCR 

/If zero,, no scrolling 

9418- 3E 

22 

22 

02 

02 

02 

02 

00 


H 

8DF9:A5 

32 


351 


LDA 

INVFLG 

/Save INVFLG 

9420- 08 

1C 

36 

63 

41 

7F 

00 

00 

Ili 

8DFB: 4 8 



352 


PHA 



9428- 00 

20 

1C 

02 

20 

1C 

02 

00 

8DFC:A9 

FF 


353 


LDA 

#$FF 

/Set NORMAL 

9430- 08 

08 

1C 

7F 

1C 

08 

08 

00 


8DFE: 8 5 

32 


354 


STA 

INVFLG 


9438- 08 

08 

1C 

7F 

1C 

00 

00 

00 



8E00:18 



355 


CLC 



9440- 00 

00 

00 

7F 

00 

00 

00 

00 

p 

u 

8E01:A5 

22 


356 


LDA 

WNDTOP 

/Start at top 

9448- 10 

08 

04 

00 

00 

00 

00 

00 

8E03:69 

01 


357 


ADC 

#$01 


9450- 08 

1C 

2A 

08 

08 

08 

08 

00 

8 E 0 5 : 8 5 

25 


358 


STA 

CV 


9458- 00 

10 

20 

7F 

20 

10 

00 

00 


8E07:20 

22 

FC 

359 

NEXTLIN2 JSR VTAB 


9460- 08 

08 

08 

08 

2A 

1C 

08 

00 


23 

8E0A:85 

2A 


360 


STA 

BAS2L 


9468- 12 

16 

1E 

7F 

1E 

16 

12 

00 

o 

8E0C:A5 

29 


361 


LDA 

BASH 


9470- 10 

08 

04 

63 

00 

00 

00 

00 

8E0E: 8 5 

2B 


362 


STA 

BAS2H 


9478- 48 

24 

12 

00 

00 

00 

00 

00 


8E10:C 6 

25 


3 63 


DEC 

CV 


9480- 7F 

22 

22 

22 

22 

22 

22 

00 


2 


(Continua: Listato 2. 

Char. Gen) 

(Continua: Listato 4. Scientifìc. Set) 


Di 


98 















o 

o 

Q 

O 

O 

O 

| 

o 

o 

ti 

fl 

0 

o 

o 

ti; 

ti 

0 

S 

8 

o 

o 

o 

o 


(Segue: Listato 2. Char. Gen) 


LISTATI PER APPLE II (Segue: Listato 4. Scientific. Set) 


8E12:20 

22 

FC 

364 


JSR 

VTAB 


8E15 :E6 

25 


365 


INC 

CV 


8E17:A4 

20 


366 


LDY 

WNDLFT 

; Start at left edge 

8E19-.84 

24 


367 

NEXTCHAR STY 

CH 


8E1B:B1 

2A 


368 


LDA 

(BAS2L) ,Y 


8E1D: 20 

55 

8E 

369 


JSR 

PLOTCHAR 

; Put ori screen one line up 

8E20:C8 



370 


INY 


V 

8E21:C4 

21 


371 


CPY 

RTWINDOW 

;Done a line? 

8E23: DO 

F 4 


372 


BNE 

NEXTCHAR 


8E25:E6 

25 


373 


INC 

CV 


8E27:A5 

25 


374 


LDA 

CV 


8E2 9 :C5 

23 


375 


CMP 

WNDBTM 

;Done screen yet? 

8E2B:DO 

DA 


376 


BNE 

NF.XTLIN2 


8E2D:68 



377 


PLA 



8E2E:85 

32 


378 


STA 

INVFLG 

;Restore INVFLG 

8E30:A5 

20 


379 


LDA 

WNDLFT 


8E32:85 

24 


380 


STA 

CH 


8E34:C6 

25 


381 


DEC 

CV 


8E36:20 

22 

FC 

382 


JSR 

VTAB 


8E39:20 

77 

8F 

383 


JSR 

CLEOL 

;Clear bottom line 

8E3C:A5 

21 


384 


LDA 

RTWINDOW 

;Restore CH to its 

8E3E:85 

24 


385 


STA 

CH 

; originai value 

8E40:C6 

24 


386 


DEC 

CH 


8E42:60 



387 


RTS 



8E43:A5 

20 


388 

NOSCR 

LDA 

WNDLFT 

;Move cursor to top of page 

8E4 5:85 

24 


389 


STA 

CH 


8E47:A5 

22 


390 


LDA 

WNDTOP 


8E49:85 

25 


391 


STA 

CV 


8E4B:4C 

22 

FC 

392 


JMP 

VTAB 

; Teli monitor where cursor is 

8E4E : 



393 

★ 




8E4E:A5 

19 


394 

SCRSWTCH LDA 

SCRFLAG 

;Toggle SCRFLAG 

8E50: 49 

FF 


395 


EOR 

#$FF 


8E52: 85 

19 


396 


STA 

SCRFLAG 


8E54:60 



397 


RTS 



8E55 : 



398 

★ 




8E55:84 

35 


399 

PLOTCHAR STY 

YSAV1 

; Save Y 

8E57: 09 

80 


400 


ORA 

#$80 

;Restore high bit 

8E5 9: 38 



401 


SEC 


;Get char 

8E5A-.E9 

AO 


402 


SBC 

# $A0 

; position 

8E5C:90 

2A 


403 


BCC 

PLOTEXIT 

;Ignore if CTRL char 

8E5E:A2 

00 


404 


LDX 

#$00 

;Zero char 

8E60: 86 

09 


405 


STX 

PTRH 

; ptr 

8E62:0A 



406 


ASL 

A 

;OFFSET= 

8E63: 26 

09 


407 


ROL 

PTRH 

; CHAR*8 

8E65:0A 



408 


ASL 

A 

; since 8 bytes/char 

8E66:26 

09 


409 


ROL 

PTRH 


8E68:0A 



410 


ASL 

A 


8E69: 26 

09 


411 


ROL 

PTRH 


8E6B:18 



412 


CLC 



8E6C: 85 

08 


413 


STA 

PTRL 


8E6E:A5 

09 


414 


LDA 

PTRH 

;PTR=TABLE BASE 

8E70:65 

07 


415 


ADC 

TABLEH 

; + OFFSET 

8E7 2:85 

09 


416 


STA 

PTRH 


8E74:A0 

07 


417 


LDY 

#$07 

;8 bytes/char 

8E76: 20 

8B 

8E 

418 

NEXTLINE JSR 

CALCGBAS 

;Calc current hires addr 

8E7 9 :B1 

08 


419 


LDA 

(PTRL),Y 

;Get char byte 

8E7B:29 

7F 


420 


AND 

#$7F 


8E7D:24 

32 


421 


BIT 

INVFLG 

; Check if inverse 

8E7F: 30 

02 


422 


BMI 

NORMAL 


8E81:49 

FF 


423 


EOR 

# $FF 

;Invert if necessary 

8E83: 81 

26 


424 

NORMAL 

STA 

(GBASL,X) 

;P1ot char byte 

8E85: 88 



425 


DEY 



8E8 6:10 

EE 


426 


BPL 

NEXTLINE 

;Next byte of char 

8E88: A4 

35 


427 

PLOTEXIT LDY 

YSAV1 

;Restore Y 

8E8A:60 



428 


RTS 


; and return 

8E8B: 



429 

* 




8E8B:18 



430 

CALCGBAS CLC 



8E8C:A5 

28 


431 


LDA 

BASL 


8E8E:65 

24 


432 


ADC 

CH 


8E90:85 

26 


433 


STA 

GBASL 


8E92:98 



434 


TYA 



8E93:0A 



435 


ASL 

A 


8E94:0A 



436 


ASL 

A 


8E95:18 



437 


CLC 



8E96:65 

29 


438 


ADC 

BASH 


8E98:65 

E6 


439 


ADC 

HPAGE 


8E9A:38 



440 


SEC 



8E9B:E9 

04 


441 


SBC 

#.$04 


8E9D: 85 

27 


442 


STA 

GBASH 


8E9F:60 



443 


RTS 



8EA0 : 



444 

★ 




8EA0:20 

BB 

DE 

445 

PAGE 

JSR 

CHKOPN 

; Check for ( 

8EA3:20 

7B 

DD 

446 


JSR 

FRMNUM 

;Get page # 

8EA6:20 

52 

E7 

447 


JSR 

GETADR 


8EA9:20 

B8 

DE 

448 


JSR 

CHKCLS 

;Check for ) 

8EAC:18 



449 


CLC 


* 

8EAD:A5 

50 


450 


LDA 

LINNUML 

/Check if page # valid 

8EAF:65 

51 


451 


ADC 

LINNUMH 


8EB1:F0 

12 


452 


BEQ 

PAGERR 

;Can only be 1 or 2 

8EB3.-C9 

03 


453 


CMP 

#$03 


8EB5:B0 

OE 


454 


BCS 

PAGERR 


8EB7: 48 



455 


PHA 


;Save it 

8EB8:OA 



456 


ASL 

A 

;Convert 1 or 2 to $20 or $40 


9488- 

00 

22 

14 

08 

14 

22 

00 

00 


9490- 

00 

20 

10 

08 

04 

3E 

00 

00 


9498- 

3E 

22 

04 

08 

04 

22 

3E 

00 

1 

94A0- 

7F 

49 

08 

08 

08 

08 

08 

00 

94A8- 

08 

36 

49 

08 

08 

08 

08 

00 

94B0- 

08 

04 

73 

00 

08 

04 

73 

00 


94B8- 

00 

08 

00 

3E 

00 

08 

00 

00 

11 

94C0- 

22 

22 

14 

08 

14 

22 

22 

00 

94C8- 

18 

24 

24 

18 

00 

00 

00 

00 

94D0- 

00 

1C 

22 

22 

14 

14 

36 

00 


94D8- 

08 

08 

3E 

00 

3E 

22 

02 

00 

o 

94E0- 

22 

12* 

0A 

07 

3A 

1A 

2A 

00 

94E8- 

04 

08 

08 

10 

08 

08 

04 

00 

94F0- 

10 

08 

08 

04 

08 

08 

10 

00 

94F8- 

22 

12 

0A 

07 

2A 

32 

3A 

00 


9500- 

80 

0F 

8F 

BF 

3F 

80 

00 

80 

2 

9508- 

00 

4C 

52 

22 

52 

4C 

00 

00 

9510- 

3C 

44 

3C 

44 

3C 

04 

04 

00 

9518- 

22 

22 

14 

1C 

22 

22 

1C 

00 


9520- 

7C 

08 

10 

3C 

22 

22 

1C 

00 

2 

9528- 

00 

00 

3C 

02 

IF 

02 

3C 

00 

9530- 

08 

08 

10 

7F 

10 

08 

08 

00 

9538- 

00 

00 

OD 

12 

12 

12 

12 

60 


9540- 

1C 

22 

22 

7F 

22 

22 

1C 

00, 

o 

9548- 

10 

08 

04 

08 

10 

00 

3E 

00 

9550- 

08 

08 

10 

08 

04 

08 

08 

08 

9558- 

08 

08 

08 

08 

08 

08 

08 

00 

9560- 

00 

02 

05 

08 

14 

22 

41 

00 


9568- 

00 

12 

12 

12 

2E 

02 

02 

00 

o 

9570- 

00 

00 

71 

11 

09 

05 

03 

00 

9578- 

04 

08 

10 

08 

04 

00 

3E 

00 

9580- 

00 

01 

3E 

54 

14 

14 

14 

00 


9588- 

10 

28 

08 

08 

08 

08 

0A 

04 

DI 

9590- 

00 

00 

1E 

22 

22 

1E 

02 

02 

9598- 

00 

00 

7E 

11 

11 

11 

0E 

00 

95A0- 

40 

3C 

0A 

08 

08 

08 

30 

00 


95A8- 

40 

20 

7F 

08 

7F 

02 

01 

00 

o 

95B0- 

08 

1C 

2A 

2A 

2A 

1C 

08 

00 

95B8- 

78 

08 

08 

08 

0A 

OD 

08 

00 

95C0- 

00 

00 

23 

14 

08 

14 

62 

00 

95C8- 

49 

2A 

2A 

2A 

1C 

08 

08 

00 


95D0- 

00 

00 

22 

41 

49 

2A 

14 

00 

a 

95D8- 

00 

3E 

26 

26 

26 

26 

3E 

00 

95E0- 

20 

20 

20 

20 

20 

20 

20 

00 

95E8- 

00 

3E 

3E 

3E 

3E 

7C 

7C 

00 


95F0- 

00 

3E 

22 

22 

22 

3E 

00 

00 

r\ 

95F8- 

6F 

75 

20 

64 

75 

6D 

6D 

79 


(Fine) 


Checksum del listato 4 

APPLE CHECKER 3.0 

NOME FILE: SCIENTIFIC.SET 

TIPO: B 

LUNGHEZZA: 0600 
CHECKSUM : 40 


(Continua: Listato 2. Char. Gen) 


gl 

o 

o 

o 

D 

o 

o 

0 

fl 

8 

Di 


99 














rS- (Segue: Listalo 2. Char. Gen) 

LISTATI PER APPLE II 

o 

WWt 8EB9 : 0A 


457 


ASL 

A 


. 8EBA: OA 


458 


ASL 

A 



ifNii 8EBB.-0A 
8EBC:OA 


459 

460 


ASL 

ASL 

A 

A 


O 

sì::::®::: 8ebd:85 e 6 


461 


STA 

HPAGE 


8EBF:68 


462 


PLA 




8EC0 :A8 

\ }: 8EC1 :B9 53 
mm- 8EC4 : 60 


4 63 


TAY 


;Use as index to select page 

o 

co 

464 

465 


LDA 

RTS 

PAGENUM,Y 

/Display correct page 

WW* 8EC5 :A2 35 


466 

PAGERR 

LDX 

#$35 



mm 8EC7 : 4C 12 
f f 8ECA: 

8eca:D8 

D4 

467 


JMP 

PRNTERR 

,‘ILLEGAL QTY ERROR 



468 

469 

* 



CLD 

o 

8ECB: 8 6 4 6 


470 

CHARIN 

STX 

XSAV 

;Save registers 

mm 8ECD:84 47 


471 


STY 

YSAV 


8ECF : 85 45 
\ Ji 8ED1 :20 64 


472 


STA 

ASAV 


o 

8F 

473 

PUTCURS 

JSR 

CURSOR 

;Plot cursor 

. X.. 8ED4 : A4 47 


474 


LDY 

YSAV 

/Restore Y 

8ED6:20 1B 

FD 

475 


JSR 

KEYIN 

;Get key, put on text screen 


:#%! 8ED9 : 20 64 
( 8EDC : AC B3 

8EDF : CO 06 

8F 

476 


JSR 

CURSOR 

;Turn off cursor 

o 

FB 

477 


LDY 

$FBB3 



478 


CPY 

#$06 

;Is it a //e or //c? 

8EE1 : F0 7C 


479 


BEQ 

INEXIT 

;yes , skip shift key stuff 


8EE3 : A4 18 
f yj 8EE5: DO 18 
8EE7 : A4 FF 


480 


LDY 

LOCK 

;If alpha locked, don't change 

.6 


481 


BNE 

CHECK 


482 


LDY 

TEMPLOCK 

/Capitalize this char only? 

8EE9:DO 14 


483 


BNE 

CHECK 

;Yes, so don't change 

8EEB : 2C 63 

CO 

484 


BIT 

SHIFTKEY 

;SHIFT pressed? 


8EEE : 10 0F 
il k 8EF0 :C9 CI 
8EF2: 90 OB 


485 


BPL 

CHECK 

;No so ignore 

o 


486 


CMP 

#$C1 

;Ignore if not 


487 


BCC 

CHECK 

; letter 

•• • 8EF4 : C9 DB 


488 


CMP 

#$DB 



8EF6 :10 07 
■■{ y 8EF8 :18 

8EF9 : 6 9 20 


489 


BPL 

CHECK 


o 


490 

491 


CLC 

ADC 

#$20 


8EFB:29 7F 


492 


AND 

#$7F 

;Make LC 

WW 8EFD:D0 60 


4 93 


BNE 

INEXIT 



ifNii 8EFF : AO 00 
8F01: 84 FF 


494 

495 

CHECK 

LDY 

STY 

#$00 

TEMPLOCK 

;Clear capitalize next flag 

Q 

" : £ 8F03 :C9 81 


496 


CMP 

#$81 

;If CTRL A, toggle alpha lock 

8F05 : DO OA 


497 


BNE 

NEXTCHK 


8F07 :A5 18 
); 8F09 : 4 9 FF 

imm 8F0B : 8 5 18 


498 


LDA 

LOCK 


q 


499 


EOR 

#$FF 



500 


STA 

LOCK 


8F0D:A5 45 


501 


LDA 

ASAV 

;Get char on screen again 


s&MS sfof.-do co 

■( y 8F11 :C9 93 
8F13 : DO OA 


502 


BNE 

PUTCURS 

O: 


503 

504 

NEXTCHK 

CMP 

BNE 

#$93 

LASTCHK 

;If CTRL S, toggle char set ptr 

•iV: 8F15 : A5 07 


505 


LDA 

TABLEH 


8F17 : 4 9 03 


506 


EOR 

#$03 



8F19 : 8 5 07 
8F1B : A5 4 5 


507 


STA 

TABLEH 


o; 


508 


LDA 

ASAV 


WMÀ 8F1D : DO B2 


509 


BNE 

PUTCURS 


$8» 8F1F.-C9 1B 


510 

LASTCHK 

CMP 

#$1B 

;If ESC, capitalize next char 


;p%: 8F21 :D0 06 

y 8F23 : 8 5 FF 
8F25 :A5 45 


511 


BNE 

CHECKK 


23 


512 


STA 

TEMPLOCK 



513 


LDA 

ASAV 


8F27: DO A8 


514 


BNE 

PUTCURS 






/Change CTRL K -> [ 


Xvi^vX orziJ :CiJ 8B 


515 

CHECKK 

CMP 

#$8B 

oi 

'■■■( yi 8F2B:F0 08 
8F2D : C9 8F 


516 


BEQ 

CONVCTRL 


517 


CMP 

#$8F 

/Change CTRL O -> 



518 


BEQ 

CONVCTRL 



8F2F:F0 04 





mm 8F31:C9 8C 


519 


CMP 

#$8C 

CHECKP 

/Change CTRL L -> \ 


8F33: DO 05 

1 k 8F35:18 


520 


BNE 

fi 


521 

CONVCTRL CLC 



mmi 8F36: 69 50 


522 


ADC 

#$50 


8F38:D0 25 


523 


BNE 

INEXIT 



8F3A:C9 CO 


524 

CHECKP 

CMP 

BNE 

CLC 

#$C0 

NEXT1 

/Change @ -> cap P 

fi 

f 1 8F3C:D0 05 


525 

526 

8F3F : 69 10 


527 


ADC 

#$10 






8F41.*D0 1C 


528 


BNE 

INEXIT 


fi 

8F43 :C9 DD 
i: 8F45 : FO 04 


529 

NEXT1 

CMP 

#$DD 

/Change ] -> cap M 


530 


BEQ 

CONVERTI 


8F47:C9 DE 


531 


CMP 

#$DE 

/Change A -> cap N 

' 8F4 9 : DO 05 


532 


BNE 

NEXT2 


8F4B : 38 

il k 8F4C : E9 10 
8F4E : DO OF 


533 

CONVERTI SEC 


/Convert A or ] to letters 

o 


534 


SBC 

#$10 



535 


BNE 

INEXIT 


; x: 8F50 : C9 80 


536 

NEXT2 

CMP 

#$80 

/Change CTRL @ -> @ 


8F52:fo 08 
f y 8F54:C9 9D 
\~S- 8F56 : FO 04 


537 


BEQ 

CONVERT2 

o 


538 


CMP 

#$9D 

/Change CTRL ] -> ] 


539 


BEQ 

CONVERT2 


8F58 :C9 9E 


540 


CMP 

#$9E 

/Change CTRL A -> A 


8F5A:D0 03 


541 


• BNE 

INEXIT 



8F5C : 18 

ik 8F5D: 6 9 40 


542 

convert; 

? CLC 



ó 


543 


ADC 

#$40 


8F5F:A6 46 


544 

INEXIT 

LDX 

XSAV 

/Restore registers 

8F61 : A4 47 


545 


LDY 

YSAV 



8F63:60 
:{ y 8F64:48 

8F65:A0 07 


546 

547 

CURSOR 

RTS 

PHA 


/Do ne 

/Save char 

O 


548 


LDY 

#$07 

/Invert 8 bytes 

«i® 8F67 :A2 00 


549 


LDX 

#$00 

/ of char at 


a 






( Continua: Listato 2. Char. Gen ) 

o: 


100 























g 

o : 

o 

2 

n 

Q 

fi 

2 

O. 

2 

o 

fi 

o 

o 

fil 

ò 

fi 

li 

3 

fi: 

6 


(Segue: Listato 2 . Char. Gen) 


LISTATI PER APPLE II 


8F69:20 

8B 

8E 

550 

NEXTBYTE 

: jsr 

CALCGBAS 

; current screei 

8F6C: Al 

26 


551 


LDA 

{GBASL,X) 

; position 

8F6E: 49 

FF 


552 


EOR 

#$FF 


8F70: 81 

26 


553 


STA 

(GBASL,X) 


8F7 2: 88 



554 


DEY 



8F73:10 

F 4 


555 


BPL 

NEXTBYTE 


8F75:68 



556 


PLA 


;Restore char 

8F76:60 



557 


RTS 



8F77 : 



558 

* 




8F77: A4 

21 


559 

CLEOL 

LDY 

RTWINDOW 

;Blank out 

8F7 9 :A5 

24 


560 


LDA 

CH 

; Save CH 

8F7B: 48 



561 


PHA 



8F7C:A9 

A0 


562 

GETSPACE 

: LDA 

#$A0 

;From current 

8F7E:20 

55 

8E 

563 


JSR 

PLOTCHAR 

; position to 

8F81:E6 

24 


564 


INC 

CH 

; RT WINDOW 

8F83:C4 

24 


565 


CPY 

CH 


8F85: DO 

F 5 


566 


BNE 

GETSPACE 


8F87:68 



567 


PLA 


;Get CH back 

8F88: 85 

24 


568 


STA 

CH 


8F8A:60 



569 


RTS 



8F8B: 



570 

* 




8F8B:20 

58 

FC 

571 

CLRSCR 

JSR 

HOME 


8F8E:4C 

91 

8F 

572 


JMP 

CLEOP 



8F91 : 

8F91:A5 
8F93: 48 
8F94:A5 
8F96:48 
8F97:20 
8F9A: 20 
8F9D:E6 
8F9F:A0 
8FA1:84 
8FA3:A5 
8FA5:C5 
8FA7:90 
8FA9: 68 
8FAA: 85 25 
8FAC:68 
8FAD:85 
8FAF:4C 


24 

25 

2 4 FC 
77 8F 
25 
00 

24 

25 
23 
EE 


24 

22 FC 


573 * 

574 CLEOP 

575 

576 

577 

578 BLANK 

579 

580 

581 

582 

583 

584 

585 

586 

587 

588 

589 

590 


LDA 

PHA 

LDA 

PHA 

JSR 

JSR 

INC 

LDY 

STY 

LDA 

CMP 

BCC 

PLA 

STA 

PLA 

STA 

JMP 


CH 

CV 

VTABZ 

CLEOL 

CV 

#$00 

CH 

CV 

WNDBTM 

BLANK 

CV 

CH 

VTAB 


; Save CH and CV 

;CLEOL 

;Next line 

; Start at left edge 

;Done yet? 

;Restore CH and CV 


SUCCESSFUL ASSEMBLY: NO ERRORS 


Checksum del listato 2 

APPLE CHECKER 3.0 
NOME FILE: CHAR.GEN 
TIPO: B 

LUNGHEZZA: 03B2 
CHECKSUM : 51 


(Fine) 



Il mensile con 
disco programmi 
per personal computer 
Ibm, Olivetti 
e compatibili. 
Prenotalo presso 
la tua edicola di fiducia. 
Costa solo 15.000 lire. 
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LISTATI PER APPLE II 


Lisato 1. inverse Keywords 


SOURCE FILE: INVERSE.KEYWORDS.S 


0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 


* INVERSE.KEYWORDS 

* BY SANDY MOSSBERG 

* COPYRIGHT (C) 1987 

* BY APPLICANDO & 

* MICROSPARC, INC 
********************* 

Requirements: 


DOS 3.3 


Apple Ile 


Apple Ile 


0000 




9 

* 1. 

HIMEM 

:38400 ($9600) or more 

0000 




10 

* 2. 

Applesoft on motherboard 

0000 




11 

* 3. 

64K RAM 


0000 




12 

* Commands: 



0000 




13 

* 1 . 

CTL-K 

(program 

on; get keyword) 

0000 




14 

* 2. 

CTL-J 

(program 

off) 

0000 




15 

* 3. 

CTL-Z 

(disconnect program) 

0000 




16 

* Tool 

Kit Assembler 


0000 




17 

* 




0006 




18 

PTR 

EQU 

$06 

/Pointer for print subroutine 

0024 




19 

CH 

EQU 

$24 

;Horizontal cursor position 

0028 




20 

BASL 

EQU 

$28 

;Left margin of current line 

0033 




21 

PROMPT 

EQU 

$33 

;Prompt character 

0038 




22 

KSWL 

EQU 

$38 

; Input hook 

003C 




23 

A1L 

EQU 

$3C 

; MOVE parm: Start 

003E 




24 

A2L 

EQU 

$3E 

; End 

0042 




25 

A4L 

EQU 

$42 

; Destination 

006F 




26 

FRETOP 

EQU 

$6F 

;Bottom of strings 

0073 




27 

MEMSIZ 

EQU 

$73 

;HIMEM 

0085 




28 

FORPNT 

EQU 

$85 

;Store index to TKNTBL 

009D 




29 

DSCTMP 

EQU 

$9D 

/Pointer to start of TKNTBL 

0200 




30 

BUF 

EQU 

$200 

/Input buffer 

03D0 




31 

DOSWRM 

EQU 

$3D0 

/Warmstart DOS 

03F2 




32 

SOFTEV 

EQU 

$3F2 

/RESET vector 

AA5 5 




33 

KSWTRUE 

EQU 

$AA55 

;True input handler address 

DODO 




34 

TKNTBL 

EQU 

$D0D0 

/Keyword table 

D53 9 




35 

GDBUFS 

EQU 

$D539 

/Strip hi bits and zero EOB 

D73 6 




36 

LISTOUT 

EQU 

$D736 

/Exit from LIST routine 

D73 9 




37 

LISTINI 

EQU 

$D739 

/LIST reentry (token found) 

D762 




38 

LISTIN2 

EQU 

$D7 62 

/LIST reentry (token not found) 

DB57 




39 

OUTSP 

EQU 

$DB57 

/Output space 

E000 




40 

BASICCLD EQU 

$E000 

/Coldstart Basic ($4C=Apsoft) 

FB6F 




41 

SETPWRC 

EQU 

$FB6F 

/Set power-up byte 

FC10 




42 

BS 

EQU 

$FC10 

;Backspace 

FC9C 




43 

CLREOL 

EQU 

$FC9C 

/Clear to end of line 

FD1B 




44 

KEYIN 

EQU 

$FD1B 

/Input character (bypass KSW) 

FD35 




45 

RDCHAR 

EQU 

$FD35 

/Input character (thru KSW) 

FD8E 




46 

CROUT 

EQU 

$FD8E 

/Output CR 

FDED 




47 

COUT 

EQU 

$FDED 

/Output character 

FE2C 




48 

MOVE 

EQU 

$FE2C 

/Move memory (Y=0) 

FF3A 


— 


49 

BELL 

EQU 

$FF3A 

;Beep! 

0000 




50 

* 





- NEXT 

OBJECT FILE NAME IS INVERSE.KEYWORDS 

9353: 




51 


ORG 

$9353 


9353: 




52 

* 




9353: 




53 

*— -- 




9353: 




54 

* Installation: 


9353: 




55 

*- 


— 


9353: 




56 

* Check 

HIMEM: 


9353: 




57 

* 




9353: 

A5 

74 


58 


LDA 

MEMSIZ+1 


9355: 

C9 

96 


59 


CMP 

#$96 


9357: 

B0 

09 


60 


BCS 

CKROM 

/HIMEM >= $9600 

9359: 

A0 

62 


61 


LDY 

#TXHMEM 

/Print "HIMEM SOTTO $9600" 

935B: 

A9 

95 


62 


LDA 

# CTXHMEM 


935D: 

20 

51 

95 

63 


JSR 

PRINT 


9360: 

F0 

36 


64 


BEQ 

BASICI 

;Always 

9362: 




65 

* 




9362: 




66 

* Check 

Applesoft ROM 

on motherboard: 

9362: 




67 

★ 




9362: 

8D 

82 

CO 

68 

CKROM 

STA 

$C082 

/Motherboard ROM read 

9365: 

AD 

00 

E0 

69 


LDA 

BASICCLD 


9368: 

C9 

4C 


70 


CMP 

#$4C 


936A: 

F0 

09 


71 


BEQ 

CK64K 

/Apsoft on motherboard 

936C: 

A0 

7A 


72 


LDY 

#TXROM 

/Print "APPLESOFT NOT 

936E: 

A9 

95 


73 


LDA 

#<TXROM 

; ON MOTHERBOARD!" 

9370: 

20 

51 

95 

V 4 


JSR 

PRINT 


9373: 

F0 

23 


75 


BEQ 

BASICI 

/Always 

9375: 




76 

★ 




9375: 




77 

* Check 

64K configuration: 

9375: 




78 

* 




9375: 

AD 

83 

CO 

79 

CK64K 

LDA 

$C083 

/Bank 2 R/W 

9378: 

AD 

83 

CO 

80 


LDA 

$C083 


937B: 

A9 

4F 


81 


LDA 

#$4F 

;Any nonzero value will do 

937D : 

8D 

00 

DO 

82 


STA 

$D000 


9380: 

CD 

00 

DO 

83 


CMP 

$D000 


9383: 

DO 

09 


84 


BNE 

N064K 

/Write failed. Not 64K 

9385: 

0A 



85 


ASL 

A 

/tri once again (to avoid chance 

9386: 

8D 

00 

DO 

86 


STA 

$D000 

; duplication of byte) 

9389: 

CD 

00 

DO 

87 


CMP 

$D000 


938C: 

F0 

OD 


88 


BEQ 

SAVDATA 

;64K present. Proceed 


(Continua: Listato 1. Inverse keywords) 


g 

o 

o 

o 

B 

o 

Ó: 

|l 

O 

o 

o 

o 

0 

B 

b 

b 

o 

o 

o 

Q 

O 

d 

S 


102 


































fi 

(Segue: Listato 

1 . Inverse keywords) LISTATI PER APPLE II 

li 

HI 

938E:8D 

82 

CO 

89 

N064K 

STA 

SC082 ;Motherboard ROM read, bank 2 WP 


9391:A0 

9E 


90 



LDY 

#TX64K ; Print "64K RAM NOT PRESENT" 

2 

93 93 :A9 

95 


91 



LDA 

#<TX64K 


9395:20 

51 

95 

92 



JSR 

PRINT 

ò 

93 98:4C 

DO 

03 

93 

BASICI 

JMP 

DOSWRM 


93 9B: 
939B: 

93 9B : 



94 

95 

96 

★ 

■ k 

Save 

current HIMEM, input handler and RESET vector: 

fi 


93 9B : A5 

73 


97 

SAVDATA 

LDA 

MEMSIZ 


0 

93 9D:8D 

EB 

95 

98 



STA 

HMEMSAV 

D; 

93A0 : A5 

74 


99 



LDA 

MEMSIZ+1 

93A2 : 8D 

EC 

95 

100 



STA 

HMEMSAV+1 


93A5 : AD 

55 

AA 

101 



LDA 

KSWTRUE 

D 

93A8 : 8D 

ED 

95 

102 



STA 

INSAV 


93AB:AD 

56 

AA 

103 



LDA 

KSWTRUE+1 

2 

93AE:8D 

EE 

95 

104 



STA 

INSAV+1 

93B1:AD 

F2 

03 

105 



LDA 

SOFTEV 


93B4:8D 

EF 

95 

106 



STA 

RSETSAV 


o 

93B7: AD 

F3 

03 

107 



LDA 

SOFTEV+1 

fi' 

93BA:8D 
93 BD: 

FO 

95 

108 

109 

* 


STA 

RSETSAV+1 


93 BD: 



110 

★ 

Move 

ROM to bank-switched memory (bank 2): 


p 

93 BD: 
93BD:8D 

81 

CO 

111 

112 

* 


STA 

$C081 ; ROM read, bank 2 write 

(3 

93C0:8D 

81 

CO 

113 



STA 

$C081 


93C3:A9 

DO 


114 



LDA 

#$D0 



93C5:8 5 

3D 


115 



STA 

A1L+1 


o 

93C7:85 

43 


116 



STA 

A4L+1 

li 

93C9:A0 

FF 


117 



LDY 

#$FF 

93CB: 8 4 

3E 


118 



STY 

A2L 


93CD: 8 4 

3F 


119 



STY 

A2L+1 


o 

93CF:C8 
93D0:84 

3C 


120 

121 



INY 

STY 

; (Y)=o 

A1L 

fi 

93D2:8 4 

42 


122 



STY 

A4L 


93D4: 20 

2C 

FE 

123 



JSR 

MOVE 


o 

93D7 : 



124 

★ 




0 

93D7 : 
93D7 : 



125 

126 

★ 

★ 

Modify LIST routine: 


93D7:8D 

83 

CO 

127 



STA 

$C083 ; Bank 2 R/W 


93DA :8D 

83 

CO 

128 



STA 

$C083 


o 

93DD:A9 

4C 


129 



LDA 

#$4C ; Place "JMP PRTKN" into LIST 

fi 

93DF : 8D 

36 

D7 

130 



STA 

LISTOUT ; routine on bank 2 

93E2:A9 

37 


131 



LDA 

#PRTKN 


93E4:8D 

37 

D7 

132 



STA 

LISTOUT+1 


fi 

93E7.-A9 

95 


133 



LDA 

#<PRTKN 

p 

93E9:8D 
93EC : 

38 

D7 

134 

135 

* 


STA 

LISTOUT+2 


93EC : 



136 

* 

Establish 

RESET handler: 



93 EC: 



137 

* 





o 

93EC:AT? 

00 


138 



LDA 

#RESET ;Po.int page 3 reset vector at 

B 

93EE:8D 

F2 

03 

139 



STA 

SOFTEV ; program reset handler 

93F1:A9 

94 


140 



LDA 

#<RESET 


93F3:8D 

F3 

03 

141 



STA 

SOFTEV+1 


DI 

93F6:20 

6F 

FB 

142 



JSR 

SETPWRC 

o 

93F9 : 



143 

★ 




93F9 : 



144 

* 

Print 

"INSTALLED": 


93F9 : 



145 

★ 





9 

93F9:AO 

B8 


146 



LDY 

#TXINST 

fi 

93FB:A9 

95 


147 



LDA 

#<TXINST 

93FD: 20 

51 

95 

148 



JSR 

PRINT 


9400: 



149 

★ 






9400: 



150 

★ 

Fall 

into 

RESET: 

o 

fi 

9400: 

9400: 



151 

152 

* 










9400: 



153 

★ 

RESET 

handler: 


9400: 



154 

* - 













B 

9400: 8D 

83 

CO 

155 

RESET 

STA 

$C083 ;Bank 2 read 

o 

9403: 



156 

■k 




9403: 



157 

★ 

Protect program above HIMEM and set bottom of stnngs: 


9403: 



158 

* 





Qi 

9403 :A9 

00 


159 



LDA 

#RESET 

fi 

9405:85 

73 


160 



STA 

MEMSIZ 

9407:85 

6F 


161 



STA 

FRETOP 

9409 :A9 

94 


162 



LDA 

#<RESET 



940B:85 

74 


163 



STA 

MEMSIZ+1 

0 

o 

940D: 8 5 
940F : 

70 


164 

165 

* 


STA 

FRETOP+1 

940F : 



166 

★ 

Reset 

input hook and notify DOS: 


940F : 



167 

* 





O 

940F:A9 

1A 


168 



LDA 

«INPUT 

3 

9411:85 

38 


169 



STA 

KSWL 

9413:A9 

94 


170 



LDA 

#<INPUT 


9415:85 

39 


171 



STA 

KSWL+1 



9417 : 4C 

DO 

03 

172 



JMP 

DOSWRM . 

o 

fi 

941A : 

Q/i i a • 



173 

t n a 

★ 



* 

y 4 1A . 



1 / 4 





941A : 



175 

* 

Input 

handler: 



941A : 



176 













0 

fi 

941A: 20 
941D : 

1B 

FD 

177 

178 

INPUT 

JSR 

KEYIN 

941D : 



179 

★ 

Command valid in immediate Basic mode, with 


941D : 



180 

★ 

cursor just to right of Applesoft prompt: 


3 








(Continua: Listato 1. Inverse keywords) 

o 


103 













o 

Q 

S 

O 

o 

Q 

bj 

o 

§ 

Q 

g 

o 

o 

jj 

S 

Q 

o 

Q 

p 

s 

o 

o 

o 


(Segue: Listato 1. Inverse keywords) LISTATI PER APPLE II 


941D : 


181 

* 




941D: 48 


182 


PHA 



941E:A5 

33 

183 


LDA 

PROMPT 


9420 :C9 

DD 

184 


CMP 

#$DD 

; " ] " 

9422:D0 

14 

185 


BNE 

RTS1 

;Invalid prompt character 

9424 :A5 

24 

186 


LDA 

CH 

9426 :C9 

01 

187 


CMP 

#1 


94 28 : DO 

0E 

188 


BNE 

RTS1 

,-Invalid position 

94 2A: 68 


189 


PLA 


94 2B : 


190 

* 




94 2B : 


191 

* Check 

for 

valid command: 

94 2B: 


192 

* 




942B:C9 

8B 

193 


CMP 

#$8B 

;"K" — $40 CTL-K 

94 2D:F0 

44 

194 


BEQ 

KCMD 


942F:C9 

8A 

195 


CMP 

#$8A 

;"J"-$40 CTL-J 

9431 :F0 

33 

196 


BEQ 

JCMD 


9433 :C9 

9A 

197 


CMP 

#$9A 

;"Z"-$40 CTL-Z 

9435 :F0 

03 

198 


BEQ 

ZCMD 


9437:48 


199 


PHA 


;Invalid command. Kill next 

9438:68 


200 

RTS1 

PLA 



9439:60 


201 


RTS 




943A : 
943A : 


202 

203 


* CTL=Z command handler: 


9466 
9466 
9466 
9466: 
9466 
9468 
946A: 
94 6D: 
94 6D: 
94 6D: 
94 6D: 
9470: 
9473 : 
9473: 
9473: 
9473: 
9476: 
9479: 
9479: 
9479: 
9479: 
94 7B : 
94 7D : 
9480: 
94 80: 
9480: 


228 

229 

230 

231 


* CTL-J command handler: 

* Print "OFF": 


CC 


232 

JCMD 

LDY 

#TXOFF 


95 


233 


LDA 

#<TXOFF 


51 

95 

234 


JSR 

PRINT 




235 

* 






236 

* Disable bank-switched 

memory and return to 



237 

★ 




82 

CO 

238 

J1 

STA 

$C082 ; 

: ROM read, bank 2 WP 

DO 

03 

239 


JMP 

DOSWRM j 

:Back to Basic 


8D 83 CO 
8D 83 CO 


AO DI 
A9 95 
20 51 95 


240 

241 

242 

243 

244 

245 

246 

247 

248 

249 

250 

251 

252 

253 


CTL-K command handler: 


KCMD 


STA 

STA 


$C083 

$C083 


; Bank 2 R/W 


Solicit name of keyword to highlight: 


LDY #TXINP 
LDA #<TXINP 
JSR PRINT 

Collect input: 


;Print "KEYWORD=>" 


9480:A2 

00 


254 


LDX 

#0 

;Character index 

9482:20 

35 

FD 

255 

GETKEYW 

JSR 

RDCHAR 

;Get character 

9485 :C9 

83 


256 


CMP 

#$83 

;"C"-$40 CTL-C aborts 

94 87 :F0 

3C 


257 


BEQ 

GOBSIC 

; to Basic 

9489 :C9 

8D 


258 


CMP 

#$8D 

;" m" $40 CTL-M is CR. 

94 8B:F0 

2F 


259 


BEQ 

RTN 


94 8D:C9 

88 


260 


CMP 

#$88 

;"H" $40 CTL-H is backspace 

948F:F0 

22 


261 


BEQ 

BCK 


9491:C9 

5F 


262 


CMP 

#95 

;"U" $40 CTL-U is copyover 

9493:D0 

14 


263 


BNE 

CTLTEST 


94 95 : A4 

24 


264 


LDY 

CH 


94 97 :B1 

28 


265 


LDA 

(BASL),Y 

,-Copyover character at cursor 

94 99: 9D 

00 

02 

266 

ADDIN ' 

STA 

BUF / X 

;Stuff into BUF 

94 9C: 20 

ED 

FD 

267 


JSR 

COUT 

;Print thè character 

94 9F:E8 



268 


INX 



94A0:E0 

09 


269 


CPX 

#9 


94A2: 90 

DE 


270 


BCC 

GETKEYW 

;9 or fewer characters allowed 

94A4:A9 

00 


271 


LDA 

#0 

/More than 9 characters 

94A6:4C 

2D 

95 

272 


JMP 

BADKEY 

; triggers error message 

94A9:C9 

A0 


273 

CTLTEST 

CMP 

#$A0 



943A : 



204 

★- 




943A: 

943A: 



205 

206 

* Restore HIMEM, input 

* 

and RESET vectors and enable ROM: 

q 

943A:AD 

EB 

95 

207 

ZCMD LDA 

HMEMSAV 


94 3D: 8 5 

73 


208 

STA 

MEMSIZ 



943F:AD 

EC 

95 

209 

LDA 

HMEMSAV+1 


u 

9442:85 

74 


210 

STA 

MEMSIZ+1 


9444 :AD 

ED 

95 

211 

LDA 

INSAV 


9447:85 

38 


212 

STA 

KSWL 



9 4 4 9 :AD 

EE 

95 

213 

LDA 

INSAV+1 


u 

94 4C: 8 5 

39 


214 

STA 

KSWL-f-1 


94 4E:AD 

EF 

95 

215 

LDA 

RSETSAV 


94 51 :8D 

F2 

03 

216 

STA 

SOFTEV 


9454 : AD 

F0 

95 

217 

LDA 

RSETSAV+1 



94 57 :8D 

F3 

03 

218 

STA 

SOFTEV+1 


o 

945A: 20 

6F 

FB 

219 

JSR 

SETPWRC 


945D : 



220 

★ 



94 5D: 



221 

* Print "ZAP 

! •• • 



94 5D : 

94 5D:A0 

C5 


222 

223 

★ 

LDY 

#TXZAP 


b! 

94 5F:A9 

95 


224 

LDA 

#<TXZAP 


9461:20 

51 

95 

225 

JSR 

PRINT 



94 64 :F0 

07 


226 

BEQ 

J1 

;Always 


Q A C. C . 



O O 





o 

o 

O 

O 

o 

B 


§P 


(Continua: Listato 1. Inverse keywords) 


y 

s 

o 

o 


D 

o 

o : 

o 


104 






















n 

! (Segue: Listato 

1 . Inverse keywords) LISTATI PER APPLE II 

0 

94AB.-B0 

EC 


274 


BCS 

ADDIN 

;No CTL character. Proceed 

o 

94AD: 20 

3A 

FF 

275 

ERRINP 

JSR 

BELL 

;CTL character. Ring bell 


94B0:4C 

82 

94 

276 


JMP 

GETKEYW 

; and get more input 

O 

94B3:8A 



277 

BCK 

TXA 


;Disable backspace if it is 


94B4:F0 

F7 


278 


BEQ 

ERRINP 

; first input character 


94B6:20 

10 

FC 

279 


JSR 

BS 

;Okay to back up 


o 

94B9:CA 



280 


DEX 


;Adjust index 

|| 

94BA:10 

C6 


281 


BPL 

GETKEYW 

;Always 

94BC:9D 

00 

02 

282 

RTN 

STA 

BUF/ X 

; Final character (CR) 


94BF : 



283 

■k 




o 

94BF : 



284 

* Check 

whether input was made: 


94BF : 
94BF:8A 



285 

286 

* 

TXA 


;If (X)=0 then no input 

23 


94C0: DO 

OE 


287 


BNE 

TKNIZE 

; Input present. Proceed 


94C2:AD 

FI 

95 

288 


LDA 

TOKEN 

;No input. Check default keyword 


o 

94C5:FO 

4 B 


289 

GOBSIC 

BEQ 

BSIC 

;No default keyword 

o 

94C7:AO 

F3 


290 


LDY 

#KEYWORD 

;Print default keyword 

94C9:A9 

95 


291 


LDA 

#<KEYWORD 


94CB:20 

51 

95 

292 

PRBSIC 

JSR 

PRINT 



o 

94CE:FO 

42 


293 


BEQ 

BSIC 

;Always 

fi 

94D0:20 

9C 

FC 

294 

TKNI2E 

JSR 

CLREOL 

;Clean up line 

94D3: 20 

39 

D5 

295 


JSR 

GDBUFS 

;Zero EOB and strip hi bits 


94D6 : 



296 

★ 




0 

94D6 : 



297 

* Tokenize and check va 

lidity of keyword: 

fi 

94D6 : 
94D6:A9 

DO 


298 

299 

* 

LDA 

#TKNTBL 

; Set keyword table 


94D8:85 

9D 


300 


STA 

DSCTMP 

; pointer at $CFD0 


94DA:A9 

CF 


301 


LDA 

# <TKNTBL-$100 


a 

94DC:85 

9E 


302 


STA 

DSCTMP+1 


D 

94DE:AO 

00. 


303 


LDY 

#0 

; (Y) indexes table characters 

94E0:8C 

F2 

95 

304 


STY 

TKNINDX 

;TKNINDX indexes keywords 


94E3:88 



305 


DEY 



a 

94E4:A2 

FF 


306 


LDX 

# $FF 


8 

94E6:C8 



307 

KEYCHR 

INY 



94E7: DO 

02 


308 


BNE 

BUFCHR 



94E9:E6 

9E 


309 


INC 

DSCTMP+1 

; (DSCTMP),Y=$D0D0 on lst pass 


0 

94EB:E8 



310 

BUFCHR 

INX 



94EC:BD 
94EF: 48 

00 

02 

311 

312 


LDA 

PHA 

BUF, X 

;Get input character 

Q 


94F0:29 

3F 


313 


AND 

# $3F 

;Convert to inverse and 


94F2:9D 

F3 

95 

314 


STA 

KEYWORD,X 

; store in buffer 


Q 

94F5:68 
94F6:38 



315 

316 


PLA 

SEC 



O 

94F7:FI 

9D 


317 


SBC 

(DSCTMP),Y 

;Check match with table character 


94F9:FO 

EB 


318 


BEQ 

KEYCHR 

;Nonfinal character match 


fi 

94FB:C9 

80 


319 


CMP 

#$80 


fi 

94FD: DO 

19 


320 


BNE 

NXKEY 

; No match. Try next keyword 

94FF: OD 

F2 

95 

321 


ORA 

TKNINDX 

; Final match. TKNINDX plus $80 


9502:8D 

FI 

95 

322 


STA 

TOKEN 

; equals value of token 



9505 :E8 



323 


INX 



fi 

9506:BD^OO 

02 

324 


LDA 

BUF, X 

;If no other character has been 

fi 

9509 :FO 

04 


325 


BEQ 

MATCH 

; input then keyword valid 

950B:A9 

00 


326 


LDA 

#0 

;If another char was input then 


950D:FO 

1E 


327 


BEQ 

BADKEY 

; keyword invalid (e.g.HOMER) 


fi 

950F:9D 

F3 

95 

328 

MATCH 

STA 

KEYWORD,X 

; Zero end of keyword buffer 

fi 

9512:20 

8E 

FD 

329 

BSIC 

JSR 

CROUT 

9515:4C 

00 

94 

330 


JMP 

RESET 

/Back to Basic 


9518 :EE 

F2 

95 

331 

NXKEY 

INC 

TKNINDX 

;Bump keyword index 


H 

951B:B1 

9D 


332 

NK1 

LDA 

(DSCTMP) , Y 

;Get table character 

g 

951D : C8 
951E:DO 

02 


333 

334 


INY 

BNE 

NK2 



9520 : E6 

9E 


335 


INC 

DSCTMP+1 




9522 :OA 



336 

NK2 

ASL 

A 

/Bit 7 into carry 


H| 

9523:90 

F6 


337 


BCC 

NK1 

/Nonfinal character 

o 

952 5 : B1 

9D 


338 


LDA 

(DSCTMP),Y 

/Get lst char in next keyword 

9527 :FO 

04 


339 


BEQ 

BADKEY 

/End of table. No such keyword 


952 9 :A2 

FF 


340 


LDX 

# $FF 



fil 

952B: DO 

BE 


341 


BNE 

BUFCHR 

/Test next keyword in table 

o 

952D:AA 



342 

BADKEY 

TAX 


952E:8E 

FI 

95 

343 


STX 

TOKEN 

/Zero TOKEN=invalid keyword 


9531 :AO 

DC 


34 4 


LDY 

#TXERR 



fi: 

9533 :A9 

95 


345 


LDA 

# CTXERR 


fi 

953 5 : DO 

94 


346 

'l a n 


BNE 

PRBSIC 

/Always 

yjo/ m 








9537: 



348 

* Token 

handler - LIST ; 

routine routed here: 



QC-57. 










y 0 0 / . 









Q 

9537: 

9537: 



350 

351 

* Check 

thè 

token being 

processed: 

o 

9537 : CD 

FI 

95 

352 

PRTKN 

CMP 

TOKEN 



953A:DO 

OF 


353 


BNE 

NOTFND 



D 

953C : 
953C : 
953C : 



354 

355 

356 

★ 

* It 1 s thè one we want. 

Print it inversely: 

o 


953C: 20 

57 

DB 

357 


JSR 

OUTSP 




953F: 84 

85 


358 


STY 

FORPNT 

; Save (Y) t 

fi 

fi 

9541 :AO 

F3 


359 


LDY 

#KEYWORD 

9543 :A9 

95 


360 


LDA 

# <KEYWORD 


9545:20 

51 

95 

361 


JSR 

PRINT 



9548:4C 

62 

D7 

362 


JMP 

LISTIN2 



□ 

9543: 

954B: 

954B: 



363 

364 

365 

* 

* It ' s not thè token we 

* 

want. Reenter LIST routine: 

o 


954B:38 



366 

NOTFND 

SEC 




D 








(Continua: Listato 1 . Inverse keywords) 

o 


105 









Q 

O: 

d 

O: 

3 

o 

d’ 

31 

Q 

o 

o 

a 

Q 

o. 

Q; 

O 

d 

o 

O 

O 

d 

d: 

Q 


(Segue: Listato 1. Inverse keywords) LISTATI PER APPLE II 


954C:E9 

7F 


367 


SBC 

#$7F 

95 4E:4C 

39 

D7 

368 


JMP 

LISTINI 

9551 : 



369 

* ====== 



9551 : 



370 

* Print 

subroutine : 

9551 : 



371 

*====== 



9551:84 

06 


372 

PRINT 

STY 

PTR 

9553:85 

07 


373 


STA 

PTR+1 

9555 :A0 

00 


374 


LDY 

#0 

9557:B1 

06 


375 

PRT1 

LDA 

(PTR) , Y 

9559 :F0 

06 


376 


BEQ 

RTS2 

955B.-20 

ED 

FD 

377 


JSR 

COUT 

955E:C8 



378 


INY 


955F:D0 

F6 


379 


BNE 

PRT1 ;Always 

9561:60 



380 

RTS2 

RTS 


9562 : 



381 




9562 : 



382 

* Text 

of messages: 

9562: 



383 

*- 


— 

9562:87 

8D 

8D 

384 

TXHMEM 

DFB 

$87,$8D,$8D 

9565:20 

08 

09 

385 


DFB 

$20,$08,$09,$0D ;" HIMEM BELOW $9600 " 

9568:0D 







9569:05 

OD 

20 

386 


DFB 

$05,$0D,$20,$02 

95 6C: 02 







95 6D: 0 5 

OC 

OF 

387 


DFB 

$05,$0C,$0F,$17 

9570:17 







9571:20 

24 

39 

388 


DFB 

$20,$24,$39,$36 

9574:36 







9575:30 

30 

20 

389 


DFB 

$30,$30,$20 

9578 : 8D 

00 


3 90 


DFB 

$8D,$00 

957A:87 

8D 

8D 

391 

TXROM 

DFB 

$87,$8D,$8D 

957D: 20 

01 

10 

392 


DFB 

$20,$01,$10,$10 APPLESOFT NOT ON MOTHERBOARD! " 

9580:10 







9581 : OC 

05 

13 

393 


DFB 

$0C,$05,$13,$0F 

9584 :0F 







9585:06 

14 

20 

394 


DFB 

$06,$14,$20,$0E 

9588 :0E 







9589:0F 

14 

20 

395 


DFB 

$0F,$14,$20,$0F 

958C:0F 







958D:0E 

20 

OD 

396 


DFB 

$0E,$20,$0D,$0F 

95 90:0F 







9591:14 

08 

05 

3 97 


DFB 

$14,$08,$05,$12 

9594:12 







9595:02 

0F 

01 

398 


DFB 

$02,$0F,$01,$12 

9598:12 







9599:04 

21 

20 

399 


DFB 

$04,$21,$20 

95 9C:8D 

00 


400 


DFB 

$8D,$00 

959E: 87 

8D 

8D 

401 

TX64K 

DFB 

$87,$8D,$8D 

95A1:20 

36 

34 

402 


DFB 

$20,$36,$34,$0B ; " 64K RAM NOT PRESENT." 

95A4:0B 







95A5:20 

12 

01 

403 


DFB 

$20,$12,$01,$0D 

95A8: OD 







95A9:20 

0E 

OF 

404 


DFB 

$20,$0E,$0F,$14 

95AC:14 







95AD: 20 

10 

12 

405 


DFB 

$20,$10,$12,$05 

95B0:05 







95B1:13 

05 

OE 

406 


DFB 

$13,$05,$0E,$14 

95B4:14 







95B5:20 



407 


DFB 

$20 

95B6:8D 

00 


408 


DFB 

$8D,$00 

95B8:8D 

8D 


409 

TXINST 

DFB 

$8D,$8D 

95BA:C9 

CE 

D3 

410 


DFB 

$C9,$CE,$D3,$D4 ;"INSTALLED" 

95BD:D4 







95BE: CI 

CC 

CC 

411 


DFB 

$C1,$CC,$CC,$C5 

95C1:C5 







95C2:C4 



412 


DFB 

$C4 

95C3:8D 

00 


413 


DFB 

$8D,$00 

95C5:87 



414 

TXZAP 

DFB 

$87 

95C6: DA 

CI 

DO 

415 


DFB 

$DA,$C1,$D0,$A1 ;"ZAP!" 

95C9:Al 







9 5 CA: 8 D 

00 


416 


DFB 

$8D,$00 

95CC:CF 

C6 

C6 

417 

TXOFF 

DFB 

$CF,$C6,$C6 ; M OFF M 

95CF:8D 

00 


418 


DFB 

$8D,$00 

95D1:CB 

C5 

D9 

419 

TXINP 

DFB 

$CB,$C5,$D9,$D7 ;"KEYWORD=> " 

95D4:D7 







95D5:CF 

D2 

C4 

420 


DFB 

$CF,$D2,$C4,$BD 

95D8:BD 







95D9:BE 

A0 


421 


DFB 

$BE,$A0 

95DB: 00 



422 


DFB 

$00 

95DC: 87 

8D 

8D 

423 

TXERR 

DFB 

$87,$8D,$8D 

95DF:C2 

CI 

C4 

424 


DFB 

$C2, $C1,$C4,$A0 ;"BAD KEYWORD" 


95E2-A0 




95E3:CB 

C5 

D 9 

425 


DFB 

$CB,$C5,$D9,$D7 

Checksum del listato 1 

95E6:D7 








95E7:CF 

D2 

C4 

426 


DFB 

$CF,$D2,$C4 

APPLE CHECKER 3.0 

95EA:00 



427 


DFB 

$00 

NOME FILE: INVERSE.KEYWORDS 

95EB : 



428 

*==== = =: 



TIPO: B 

95EB : 



429 

* Storage locations: 

LUNGHEZZA: 02AB 

95EB : 



430 

*====== 



CHECKSUM : C6 

95EB: 00 

96 


431 

HMEMSAV 

DW 

$9600 ;Default 


95ED:1B 

FD 


432 

INSAV 

DW 

$FD1B ,-Default 

95EF:BF 

9D 


433 

RSETSAV 

DW 

$9DBF ;Default 

95F1:00 



434 

TOKEN 

DFB 

$00 ;Start with highlighting off 

95F2 : 



435 

TKNINDX 

DS 

1 

95F3 : 



436 

KEYWORD 

DS 

10 

95FD: 00 



437 


DFB 

$00 


(Fine) 

*** SUCCESSFUL ASSEMBLY: NO ERRORS 


O 

o 

fi 

o 

d 

o 

B: 

B 

o 

D 

d 

a 

o 

o 

d 

B 

o 

o 

o 

G 

o! 

o 

0 


106 


















y 

o 

o 

Si 

o 

Q 

6 

O 

D 

0 

S 

Si 

o 

o 

6 ; 

B 

Ò: 

O 


□ 


LISTATI PER APPLE II 


RamDisk. Listato 1 


SOURCE FILE: 
0000 : 

0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 . 

0000 
0000 
0000 


A5B2 

A7D4 

AAB6 

BD00 

0000 


RAMDISK.SETUP.S 
]_ ********** 


2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 


RAMDISK.SETUP 
BY MICHAEL HARHEN 

COPYRIGHT (C) 1987 
BY APPLICANDO & 
MICROSPARC, INC. 

TOOL KIT ASSEMBLER 
48K II PLUS WITH LANGUAGE 
CARD, //E OR //C 


DOS 3.3 


Apple Ile 


Apple Ile 


0000 

13 

************ 

************ 

★★★★★★★★ 

0000 

14 

* 




0000 

15 

* User 

-defined variables 

0005 

16 

LOGSL 

EQU 

$5 

Logicai slot # of RAM-disk 

0000 

17 

PHYSL 

EQU 

$0 

Physical slot # of RAM-card 

0000 

18 

★ 



0000 

19 

* RAM- 

disk 

equates 


0000 

20 

SL10 

EQU 

PHYSL*$10 ; 

Slot times 16 

C082 

21 

ROMSEL 

EQU 

SC082+SL10 

; Read/write enable ROM 

C083 

22 

RAMSEL 

EQU 

SC083+SL10 

; Read/write enable RAM-disk 

0000 

23 

★ 




0000 

24 

* Page 

zero 

addresses 


002A 

25 

DESTPTR 

EQU 

$2 A 

Pointer to RAM-disk RWTS dest 

002C 

26 

BLOCK4K 

EQU 

S2C 

4k block in RAM-card, 0, 1, 2 

003E 

27 

BUFPTR 

EQU 

$3 E 

Buffer address pointer 

0046 

28 

RAMPTR 

EQU 

$4 6 

RAM-disk address pointer 

0048 

29 

IOBPTR 

EQU 

$4 8 

IOB address pointer 

0000 

30 

★ 



0000 

31 

* IOB 

offsets 


0001 

32 

IBSLOT 

EQU 

$1 

Slot times $10 

0002 

33 

IBDRVN 

EQU 

$2 

Drive # ($01 or $02) 

0004 

34 

IBTRK 

EQU 

$4 

Track # 

0005 

35 

IBSECT 

EQU 

$5 

Sector # 

0008 

36 

IBBUFP 

EQU 

$8 

Pointer to read/write buffer 

oooc 

37 

IBCMD 

EQU 

$C 

Command code 

000D 

38 

IBSTAT 

EQU 

$D 

Error code 

000E 

39 

IBSMOD 

EQU 

$E 

Voi # of last access 

000F 

40 

IOBPSN 

EQU 

$F 

Slot # of last access 

0010 

41 

IOBPDN 

EQU 

$10 

Drive # of last access 

0000 

42 

★ 




0000 

43 

* DOS 

addresses 


9D00 

44 

DOSBUFF 

EQU 

$9D00 

Ptr to lst DOS buffer 


45 SETBASIC EQU $A5B2 

46 INITDOS EQU $A7D4 

47 BASICFLG EQU SAAB6 

48 RWTS EQU SBD00 

49 * 


Set desired BASIC 
Rebuild DOS buffers 
Active BASIC flag 
Main entry to RWTS 


2000 : 
2000 : 
2000 : 
2000:38 
2001:AD 


2014 : 

2014 : 
2014:18 

2015 :AD 
2018:69 
201A: 8 5 
201C:AD 
201F: 69 
2021:85 
2023 : 
2023: 


20 2A:C8 


20 2F: 
202F : 
202F:A9 


203E : 
203E: 


NEXT OBJECT FILE NAME IS RAMDISK.SETUP 




50 


ORG 

$2000 




51 

★ 






52 

★ 

Create space between DOS and its buffers 



53 


SEC 

; 

Decrement pointer to 

00 

9D 

54 


LDA 

DOSBUFF 

first DOS buffer 

B8 


55 


SBC 

#END+1-STRT 

; by size of program 

00 

9D 

56 


STA 

DOSBUFF 

to be relocated 

01 

9D 

57 


LDA 

DOSBUFF+1 


00 


58 


SBC 

#END+l-STRT/256 

01 

9D 

59 


STA 

DOSBUFF+1 


D4 

Al 

60 


JSR 

INITDOS 

Rebuild DOS buffers 



61 

★ 






62 

* 

Calculate 

new location 

of program 



63 


CLC 



00 

9D 

64 


LDA 

DOSBUFF 

To address of first DOS 1 

26 


65 


ADC 

#$26 

add $26 for filename a; 

2A 


66 


STA 

DESTPTR 

link fields 

01 

9D 

67 


LDA 

DOSBUFF+1 


00 


68 


ADC 

#$00 


2B 


69 


STA 

DESTPTR+1 




70 

★ 






71 

★ 

Move program to final 

destination 

00 


72 


LDY 

#0 


E0 

20 

73 

MOVEPROG LDA 

STRT/Y 


2A 


74 


STA 

(DESTPTR) , Y 




75 


INY 



B9 


76 


CPY 

#END+2-STRT 


F6 


77 


BNE 

MOVEPROG 




78 

* 






79 

★ 

Put jump 1 

to RAMDISK routine néar start of RWTS 

4C 


80 


LDA 

#$4C 

" JMP " 

0E 

BD 

81 


STA 

RWTS+$0E 


2A 


82 


LDA 

DESTPTR 


0F 

BD 

83 


STA 

RWTS+$0F 


2B 


84 


LDA 

DESTPTR+1 


10 

BD 

85 


STA 

RWTS+$10 




86 

★ 






87 

★ 

Patch DOS 

to use track 

$11 to store files 


(Continua: Listato 1. RamDisk) 


Q 

§ 

O 

li 

O: 

B 

0 

o 

o 

s 

B 

2 

D 

o 

2 

B 

o 

fl 

o. 

o 

B 

0 


107 














































1 

(Segue: Listato 1. RamDisk) 

LISTATI PER APPLE II 

Q 

203E:A9 
2040:8D 

A9 

92 

B2 

88 

89 


LDA 

STA 

#$A9 
$B2 92 




o 




2043: 

2043: 



90 

91 

★ 

Disable INIT command 


O 

2043 :A9 

20 


92 


LDA 

#$20 



2045:8D 

84 

A8 

93 


STA 

$A884 



0 

2048 :A9 

6A 


94 


LDA 

#$6A 

Prevent cali to INIT 

P 

204A:8D 

DF 

AA 

95 


STA 

$AADF 

via File Manager 

204D:A9 

B3 


96 


LDA 

#$B3 

(Causes "WRITE PROTECT" error) 


204F:8D 

EO 

AA 

97 


STA 

$AAE0 


0 

2052: 



98 

*' 





2052: 



99 

★ 

Enable RAM-card 


d 

2 0 5 2 : AD 

82 

CO 

100 


LDA 

$C082 

De-select RAM-card in slot 0 


2 0 5 5 : AD 

83 

CO 

101 


LDA 

RAMSEL 

Select RAM 


2 0 5 8 : AD 

83 

CO 

102 


LDA 

RAMSEL 

Write-enable RAM 


Q 

205B: 
205B : 



103 

104 

★ 

★ 

Initialize VTOC and directory sectors on RAM-disk 

B 

205B:A9 

00 


105 


LDA 

#0 

Place $0 in sect $0-$3, tr. $11 


205D:AA 



106 


TAX 


; of RAM-disk 



205E:9D 

00 

DO 

107 

RAMCLR STA 

$D000,X 

Sector $0 (VTOC) 

B 

o 

2061:9D 

00 

DI 

108 


STA 

$D100,X 

Sector $1 (Directory) 


2064:9D 

00 

D2 

109 


STA 

$D200/X 

Sector $2 (Directory) 


2067:9D 

00 

D3 

110 


STA 

$D300,X ; 

Sector $3 (Directory) 


D 

206A:E8 



111 


INX 



206B: DO 
206D: 

FI 


112 

113 

★ 

BNE 

RAMCLR 


Bj 


206D: 



114 

★ 

Put VTOC 

on track .$11 

, sector $0 of RAM-disk 


206D:AO 

48 


115 


LDY 

#VTOCEND+4- 

VTOC 



206F:B9 

97 

20 

116 

MOVEVTOC LDA 

VTOC-1,Y 


0 

:( ) 

2072:99 

FF 

CF 

117 


STA 

$CFFF,Y 



2075:88 



118 


DEY 




207 6 : DO 

F7 


119 


BNE 

MOVEVTOC 



H 

2078 :A9 

FF 


120 


LDA 

# $FF 

Sectors $F to $8 free 

O 

207A:8D 

7C 

DO 

121 


STA 

$D07C 

on track $11 

207D : A9 

FO 


122 


LDA 

# $F0 

Sectors $7 to $4 free 


2 07F : 8D 

7D 

DO 

123 


STA 

$D07D 

on track $11 


2082: 



124 

* 





ó 

2082:A9 

11 


125 


LDA 

#$11 

Track $11 (catalog) 

O: 

2084: 8D 

01 

D2 

126 


STA 

$D201 

Sector $2 

2087: 8D 

01 

D3 

127 


STA 

$D301 

Sector $3 


208A:A9 

01 


128 


LDA 

#$01 

Put pointer to sector $1 


o 

208C:8D 

02 

D2 

129 


STA 

$D202 

on sector $2 

i|| 

208F:A9 

02 


130 


LDA 

#$02 

Put pointer to sector $2 

2091: 8D 

02 

D3 

131 


STA 

$D302 

on sector $3 


2094: 



132 

★ 





Q: 

2 0 9 4 : AD 

82 

CO 

133 


LDA 

ROMSEL 

Select ROM 

III 

2097:60 



134 


RTS 


; Return to caller 

2098: 



135 

★ 

End of RAM-disk initialization 


2098: 



136 

★ 





2098: 



137 

* 

VTOC of RAM-disk 



o 

2098:02 



138 

VTOC DFB 

2 

Not used 

|| 

2099:11 



139 

VT0C1 DFB 

$11 ; 

Track # of first catalog sector 

209A:03 



140 

VTOC2 DFB 

3 

; Sector # of first catalog sect. 


209B:03 



141 

VTOC3 DFB 

3 

DOS 3.3 


n 

2 0 9C: 



142 

VTOC45 DS 

2 

Not used 

Q 

209E:FE 



143 

VTOC6 DFB 

254 

; RAM-disk volume number 

209F: 



144 

VTOC726 DS 

32 

Not used 


20BF: 7A 



145 

VTOC27 DFB 

122 

Max # of T/S pairs per sector 


Q 

20C0 : 



146 

VTOC282F DS 

8 

Not used 


20C8: 00 



147 

VTOC30 DFB 

0 

Last track allocated 


20C9: 01 



148 

VTOC31 DFB 

1 

Direction of track allocation 

2 OCA: 



149 

VTOC3233 DS 

2 

Not used 


20CC:12 



150 

VTOC34 DFB 

$12 

No. of tracks per diskette 


Q 

20CD:10 



151 

VTOC35 DFB 

16 

16 sectors per track 


20CE:00 

01 


152 

VTOC3637 DFB 

$00,$01 

256 bytes per sector 

( ì: 

20D0: 00 

00 

00 

153 

VTOC383B DFB 

$oo,$oo,o,o 

; All track 0 allocated 


D 

20D3: 00 
20D4:FF 

FF 

00 

154 


DFB 

$FF,$FF,0,0 

; All track 1 free 


20D7: 00 
20D8:FF 
20DB:00 

FF 

00 

155 


DFB 

$FF,$FF,0,0 

; All track 2 free 

s 



20DC:FF 

FF 

00 

156 

VTOCEND DFB 

$FF,$FF,0,0 

; All track 3 free 


o 

20DF:00 
20E0 : 



157 

* 




D 

20E0 : 



158 

★ 





20E0 : 



159 

* 

Start of RAM-disk RWTS patch 


lo 

20E0:AO 

01 


160 

STRT 

LDY #IBSLOT ; Check for RAM-disk slot 

5 

20E2:B1 

48 


161 


LDA 

(IOBPTR),Y 


20E4:C9 

50 


162 


CMP 

#LOGSL*$10 j 

r RAM-disk slot? 


20E6:FO 

W 


163 


BEQ 

SAVEVOL 

If RAM-disk 


o 

20E8:AA 



164 


TAX 


: Save new slot temporarily 

I 

20E9:AO 

OF 


165 


LDY 

#IOBPSN 


20EB:B1 

48 


166 


LDA 

(IOBPTR)/Y ; 

: Make sure previous slot # 


20ED:C9 

50 


167 


CMP 

#LOGSL*$10 ; 

: is not RAM-disk slot 



20EF: DO 

03 


168 


BNE 

JMPRWTS 

If previous slot not RAM-disk 


ifl 

20F1:8A 



169 


TXA 


r Recali new slot 

0 

20F2:91 

48 


170 


STA 

(IOBPTR), Y ; 

: Make new slot = previous slot 

20F4:4C 

12 

BD 

171 

JMPRWTS JMP 

RWTS+$12 ; 

If not RAM-disk, use std. RWTS 


20F7 : 



172 

★ 





fl 

2ÒF7:AO 

OE 


173 

SAVEVOL LDY 

#IBSMOD 

Save volume, and drive in IOB 


20F9:A9 

FE 


174 


LDA 

#254 

RAM-disk volume #254 

{ ) 

20FB: 91 

48 


175 


STA 

(IOBPTR) -, Y 




20FD:AO 

02 


176 


LDY 

#IBDRVN 

Get drive # 


i 








(Continua : Listato 1. RamDisk) 

1 


108 
































Q 

O 

c 

ò 

o 

H 

i| 

o 

§ 

òj 

o 

a 

o 

o 

3 

o 

o 

o 

o 

ó 

o ; 

B 

Q 


(Segue: Listato 1. RamDisk) 


LISTATI PER APPLE II 


n 


2OFF :B1 

48 


177 


LDA 

2101 :A0 

10 


178 


LDY 

2103:91 

48 


179 


STA 

2105: 



180 

* 


2105:A0 

08 


181 


LDY 

2107 :B1 

48 


182 


LDA 

2109:85 

3E 


183 


STA 

210B:C8 



184 


INY 

210C.-B1 

48 


185 


LDA 

210E:85 

3F 


186 


STA 

2110: 



187 

* 


2110:A0 

04 


188 


LDY 

2112 :B1 

48 


189 


LDA 

2114 : DO 

05 


190 


BNE 

2116 :A9 

80 


191 

READERR 

LDA 

2118:38 



192 


SEC 

2119 :B0 

64 


193 


BCS 

211B : 



194 

* 


211B:C9 

11 


195 

NOTZERO 

CMP 

211D: DO 

05 


196 


BNE 

211F:A9 

00 


197 


LDA 

2121:18 



198 


CLC 

2122:90 

04 


199 


BCC 

2124: 



200 

* 


2124 :C9 

04 


201 

CHKSIZE 

CMP 

2126:B0 

EE 


202 


BCS 

2128: 



203 

★ 


2128:85 

2C 


204 

TRACKOK 

STA 

212A:A2 

00 


205 


LDX 

212C:C9 

03 


206 


CMP 

212E: DO 

06 


207 


BNE 

2130 :A9 

00 


208 


LDA 

2132:85 

2C 


209 


STA 

2134 :A2 

08 


210 


LDX 

2136: 



211 

* 


213 6 :A9 

00 


212 

GETADRS 

LDA 

2138:85 

46 


213 


STA 

213A:18 



214 


CLC 

213B:A9 

OD 


215 


LDA 

213D:65 

2C 


216 


ADC 

213F:0A 



217 


ASL 

214 0:0A 



218 


ASL 

2141:0A 



219 


ASL 

214 2:0A 



220 


ASL 

2143:A0 

05 


221 


LDY 

2145:71 

48 


222 


ADC 

2147:85 

47 


223 


STA 

2149: 



224 

* 


214 9 : AD 

co 

225 


LDA 

214 C: BD 

83 

CO 

226 


LDA 

214 F: BD 

83 

CO 

227 


LDA 

2152: 



228 

* 


2152:A0 

OC 


229 


LDY 

2154:B1 

48 


230 


LDA 

215 6 :C9 

00 


231 


CMP 

2158:F0 

21 


232 


BEQ 

215A:C9 

01 


233 


CMP 

215C:F0 

09 


234 


BEQ 

215E:C9 

02 


235 


CMP 

2160 :F0 

10 


236 


BEQ 

2162 :A9 

08 


237 


LDA 

2164:38 



238 


SEC 

2165 :B0 

18 


239 


BCS 

2167: 



240 

* 


2167:A0 

00 


241 

READ 

LDY 

2169:B1 

46 


.242 

GETBYTE 

LDA 

216B:91 

3E 


243 


STA 

216D:C8 



244 


INY 

216E:DO 

F9 


245 


BNE 

2170 :F0 

09 


246 


BEQ 

2172: 



247 

★ 


2172:A0 

00 


248 

WRITE 

LDY 

2174 :B1 

3E 


249 

PUTBYTE 

LDA 

2176:91 

46 


250 


STA 

2178 :C8 



251 


INY 

217 9 : DO 

F9 


252 


BNE 

217B: 



253 

* 


217B:A9 

00 


254 

ALLDONE 

LDA 

217D: 18 



255 


CLC 

217E: 24 



256 


DFB 

217F: 38 



257 

HNDLERR 

SEC 

2180:A0 

OD 


258 


LDY 

2182:91 

48 


259 


STA 

2184:08 



260 


PHP 

218 5 : AD 

82 

CO 

261 


LDA 

218 8 : AD 

B6 

AA 

262 


LDA 

218B:DO 

04 


263 


BNE 

218D:A9 

20 


264 


LDA 

218F: DO 

02 


265 


BNE 

2191 :A9 

4C 


266 

APPLSOFT 

1 LDA 

2193:20 

B2 

A5 

267 

SELBASIC 

: JSR 

2196:28 



268 


PLP 

2197:60 



269 

END 

RTS 


( IOBPTR), Y 
#IOBPDN 

Save drive # 


(IOBPTR),Y 



#IBBUFP 

Save addr. of read/write buffer 

(IOBPTR)/Y 
BUFPTR 



(IOBPTR), Y 
BUFPTR+1 



#IBTRK 
(IOBPTR),Y 

Get track no. 


NOTZERO 

Do not allow access to track $0 

#$80 

Read error 


HNDLERR 

Always 


#$11 

Track $11 (directory)? 


CHKSIZE 

Not track $0 or $11 


#$00 

Directory track $11 becomes 

; $00 

TRACKOK 

Always 


#4 

Only tr 1-3,$11 (0) on RAM- 

disk 

READERR 

Others cause read-error 


BLOCK4K 

Save track # 


#$00 

Assume bank #2 


#3 

Track $3? 


GETADRS 

If not track $3 


#$00 

Track 3 is at $D000 + $0000 

BLOCK4K 

#$08 

Track $3 is on bank #1 


#$00 

Find addr. of sect. in RAM- 

card 

RAMPTR 

Tracks are at $D000,$E000,$F000 

#$D 

RAM-disk starts at $D000 


BLOCK4K 

Add offset for 4k block 


A 

Multiply by $10 


A 

A 

A 

#IBSECT 

to get $D0, $E0, or $F0 


(IOBPTR),Y 

; Add offset for sector 


RAMPTR+1 ; 

to $D0, $E0, or $F0 


$C082 

De-select RAM-card in slot 

0 

RAMSEL,X ; 

Select RAM-card 


RAMSEL,X ; 

Write enable RAM-card 


#IBCMD 

Get command code 


(IOBPTR),Y 

#$o 

Seek? 


ALLDONE 

Do nothing 


#$1 

Read? 


READ 
#$ 2 

WRITE 

Write? 


#$8 

Format disk? 



,* Return error 


HNDLERR 

Always 


#0 

(RAMPTR),Y , 

; Read RAM-disk 


(BUFPTR),Y , 

; Write to buffer 


GETBYTE 

ALLDONE 



#0 

(BUFPTR),Y ; 

Read buffer 

Checksum del listato 1 

(RAMPTR)/Y ; 

; Write to RAM-disk 

NOME FILE: RAMDISK.SETUP 

PUTBYTE 


TIPO: B 

LUNGHEZZA: 0198 

#$00 

No error 

CHECKSUM : 84 

$24 

"BIT" becomes "BIT $38" 



: "SEC" skipped if no error 


#IBSTAT 
(IOBPTR),Y ; 

: Return code 
: Save carry flag 


ROMSEL 

Select ROM 


BASICFLG ; 

APPLSOFT 

; Get active BASIC 


#$20 ; 

■ Integer BASIC 



SELBASIC 

# $4C ; Applesoft 

SETBASIC ; Select desired BASIC 
; Retrieve carry flag 
; Return to caller 

(Fine) 


D 

| 

o 

3 

| 

ò 

p 

D 

p 

o 

o 

o 

B 

o 

o 

pi 

o 

o 

B 

B 

o 
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o 






LISTATI PER APPLE II 


o 

Listato 1. 

Mr.Mouse 







9 

0000 
: oooo 
0000 




1 

2 ********* 

3 * 

4 * M R 

5 * 

LST 

ON,NOA,G 





o; 




M 

0 U S E 

★ 


DOS 3.3 



0000 

oonn 




* 


ProDOS 



t ) 

0000 

0000 




6 * Scritto da : 



Apple Ile 


9 










Apple Ile 



0000 




8 * Augusta Gennaio 1987 

★ 





0000 




9 * 

con 

* 





D 

0000 

0000 




10 * ProDOS 

11 * 

Assembler Too.ls * 




B 

: oooo 




12 * Copyright 

(C) 1987 

★ 





: oooo 




13 * by 

Applicando 

★ 





□ 

oooo 

oooo 

oooo 




14 * 

15 ************* 

16 * 

*********** 

★ 

★ ★ ★ 




o 


oooo 




17 * Indirizzi equivalenti 






d 

oooo 

oooo 



0011 

18 * 

19 STRING 

EQU 

$11 


Stringa se bit signif.® 

-- 1 . 

p 

oooo 



0012 

20 VARINT 

EQU 

$12 


Variabile intera se bit signif.= 1. 


oooo 



0033 

21 PROMPT 

EQU 

$33 


Carattere di 

prompt. 




oooo 



0035 

22 YSAVE 

EQU 

$35 


Conserva il 

registro Y. 
ilizzati 



O 

: oooo 



003C 

23 Al 

EQU 

$3C 


Parametri ut 


|Pi:j 

; oooo 



003E 

24 A2 

EQU 

$3E 


dal sottoprogramma 


u 

:• oooo 



0042 

25 A4 

EQU 

$42 


MOVE del monitor. 




oooo 



0045 

2 6 REG 

EQU 

$45 


Contiene l'ACC in caso 

di interrupt. 


Q 

oooo 



0050 

27 VABS 

EQU 

$50 


LO byte del 

valore calcolato da GETABS. 

pj 

oooo 



0085 

28 FORPNT 

EQU 

$85 


Puntatore alla variabile. 

oooo 



009D 

2 9 FAC 

EQU 

$9D 


Accumulatore 

Flottante. 



: oooo 



00B1 

30 GETCHAR 

EQU 

$B1 


Ottiene il byte successivo o 



oooo 



00B7 

31 GOTCHAR 

EQU 

$B7 


corrente puntato dal BASIC. 

P 

Q 

oooo 



03D0 

32 DOSWARM 

EQU 

$3D0 


Partenza a caldo del DOS. 

oooo 



03F2 

33 RESVECT 

EQU 

$3F2 


Vettori di : 

RESET, 


: oooo 



03F6 

34 AMPVECT 

EQU 

$3F6 



AMPERSAND 

(&) e 


: oooo 



03FE 

35 IRQVECT 

EQU 

$3FE 



Richiesta 

di INTERRUPT. 


0 

: oooo 



0478 

3 6 XL 

EQU 

$478 


+Nslot=LO byte di X. 


D 

: oooo 



04F8 

37 YL 

EQU 

$4F8 


+Nslot=LO byte di Y. 


: oooo 



0578 

38 XH 

EQU 

$578 


+Nslot=HI byte di X. 



oooo 



05F8 

3 9 YH 

EQU 

$5F8 


+Nslot=HI byte di Y. 



0 

: oooo 



0778 

40 STATO 

EQU 

$778 


+Nslot=Stato 

pulsante e 

> interrupt. 

P 

oooo 



D42A 

41 PRTERR 

EQU 

$D42A 


Stampa ERROR 

, beep ed entra nel BASIC. 

oooo 



DD67 

42 FRMNUM 

EQU 

$DD67 


Valuta una formula mettendola nel FAC. 


oooo 



DD6A 

43 CHKVAR 

EQU 

$DD6A 


Controlla che non sia una stringa. 



oooo 



DEB8 

44 CHKCLS 

EQU 

$DEB8 


Controlla il 

byte puntato con ")" 


o 

oooo 



DEBB 

45 CHKOPN 

EQU 

$DEBB 


o con " (" 



a 

oooo 



DEBE 

46 CHKCOM 

EQU 

$DEBE 


o con 



i: oooo 



DECO 

47 CHKA 

EQU 

$DEC0 


o con 1'ACCumulatore. 



■ì oooo 



DFE3 

48 PTRGET 

EQU 

$DFE3 


Cerca l'indirizzo della variabile. 


Q. 

1! oooo 



E199 

49 ILLERR 

EQU 

$E19 9 


Stampa ILLEGAL QUANTITY ERR. 

3 

i; oooo 



E3DD 

50 NEWSTRNG 

EQU 

$E3DD 


Sposta l'area destinata alle stringhe. 

ii OOOO 



— £6F8 

51 GETZPG 

EQU 

$E6F8 


Mette in X il valore contenuto nel FAC. 


i oooo 



E752 

52 GETABS 

EQU 

$E752 


Mette il FAC 

in $50 e in $51. 


Ol 

oooo 



EB27 

53 MOVMF 

EQU 

$EB27 


Sposta il FAC nella memoria. 

o 

oooo 



EBAO 

54 FLOAT2 

EQU 

$EBA0 


Pone un valore reale nel FAC. 

oooo 



F2 22 

55 CTRLCARRY 

EQU 

$F222 


Controlla il 

carry. 



oooo 



F2E9 

56 ERRBASIC 

EQU 

$F2E9 


Esegue 1'ONERR GOTO. 




oooo 



FC22 

57 VTAB 

EQU 

$FC22 


Tabulazione 

verticale. 



d 

oooo 



FC42 

58 CLREOP 

EQU 

$FC4 2 


Cancella lo 

schermo dal 

cursore in giu'. 

p 

oooo 



FDOC 

59 RDKEY 

EQU 

$FD0C 


Accetta un carattere dalla tastiera. 

oooo 



FD6A 

60 GETLN 

EQU 

$FD6A 


INPUT di una 

linea. 



oooo 



FDED 

61 COUT 

EQU 

$FDED 


Stampa il carattere contenuto nell'ACC. 


o 

oooo 



FE2C 

62 MOVE 

EQU 

$FE2C 


Subroutine che sposta la memoria. 

a 

oooo 



FFA7 

63 -GETNUM 

EQU 

$FFA7 


Valuta l'input in esadecomale. 

: OOOO 



FFC7 

64 ZMODE 

EQU 

$FFC7 


Pone Y e $31 

a 0. 



: oooo 




65 

LST 

GEN 






D 

oooo 




66 

MSB 

ON 





!| 

— 

- NEXT ' 

OBJECT 

FILE NAME IS MR.MOUSE 





5FFD : 



5FFD 

67 

ORG 

$5FFD 





5FFD : 




68 * 








5FFD : 




69 * PROGRAMMA RILOCATORE 






6 

5FFD : 
5FFD: 
5FFD: 




70 * 

71 * Punto di accesso con 
io * 

BRUN INTERRUPT.MOUSE 


o: 


5FFD: 

4E 

DB 

63 

73 

LSR 

MODE 






0 

6000: 

6000: 

6000: 




74 * 

75 * Punto di accesso con 

76 * 

CALL 24576 o con 

6000G 


9 


6000: 

20 

42 

FC 

77 

JSR 

CLREOP 







6003: 

A2 

1B 


78 

LDX 

#ENDADD-BEGADD 





9 

6005: 

BD 

3A 

60 

79 LOOP1 

LDA 

BEGADD,X 





O; 

6008: 

20 

ED 

FD 

80 

JSR 

COUT 


Visualizza la richiesta 

dell'indirizzo. 

600B: 

CA 



81 

DEX 







600C: 

10 

F7 

6005 

82 

BPL 

LOOP1 






Q 

600E : 
6010: 

A9 

85 

A4 

33 


83 

84 

LDA 

STA 

#'$' 

PROMPT 





DI 

6012: 

20 

6A 

FD 

85 

JSR 

GETLN 


Input indirizzo in esadecimale. 


6015: 

20 

C7 

A7 

FF 

86 

87 

JSR 

JSR 

ZMODE 

GETNUM 


Valuta l'input. 



O 

6018: 

20 

FF 




601B: 
601D : 

A4 

A5 

3C 

3D 

61 

88 

89 

LDY 

LDA 

Al 

Al + 1 
QUANT 

IPMOTHT-T 





Q 


601F : 

r n o o • 

20 

A n 

91 

o "2 

90 

91 

JSR 
t rw 

3EGINT 





O 

bUz Z l 

6024: 

RZ 

BD 

z 

56 

60 

92 LOOP 2 

LiU A 

LDA 

7T Hi 1 U X IN 1 L 

BEGINT,X 



(Continua: Listato 1. Mr Mouse) 
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D 

(Segue: Listato 1. Mr Mouse) 

LISTATI PER APPLE II 

o 

6027:20 

ED 

FD 

93 


JSR 

COUT 

;Visualizza richiesta di ignoro interr. 


602A:CA 



94 


DEX 



o 

602B: 10 

F7 

6024 

95 


BPL 

LOOP 2 


1 

602D: 20 
6030 :C9 

OC 

CE 

FD 

96 

97 


JSR 

CMP 

RDKEY 
# 'N' 

/Legge il tasto premuto. 

;Se e' stata premuta la 'N' 


6032 :F0 

68 

609C 

98 


BEQ 

OKINT 


o 

6034 :C9 
6036 :FO 

EE 

64 

60 9C 

99 

100 


CMP 

BEQ 

# ' n ' 

OKINT 

/oppure la 'n' 

;si considerano tutti gli interrupt, 

o 

6038 : DO 

5D 

6097 

101 


BNE 

NOINT 

/■altrimenti solo quelli del Mouse. 


603A:A0 

CF 

DA DA 

102 

BEGADD 

ASC 

' 

OZZIRIDNI :ESUOM.TPURRETNI 1 



603E.-C9 

D2 

C9 C4 







0 

6042 : CE 
604 6 :C5 
604A:CD 

C9 

D3 

AE 

AO BA 

D5 CF 

D4 DO 






b 


604E:D5 

D2 

D2 C5 







0 

6052 :D4 
6055:8D 

CE 

C9 

103 

ENDADD 

DFB 

$8D 

; RETURN 

B 

605 6 :AO 

A9 

CE AF 

104 

BEGINT 

ASC 

1 

)N/S ( ? TPURRETNI IRTLA ILG ORONGI' 


605A:D3 

A8 

AO BF 






D 

605E:AO 

D4 

DO D5 







6062.: D2 
6066 : CE 

D2 

C9 

C5- D4 

AO C9 






b 

606A:D2 

D4 

CC CI 







606E:AO 

C9 

CC C7 







o 

6072 :AO 
6076:CE 
607 9:8D 

CF 

C7 

D2 CF 

C9 

105 

ENDINT 

DFB 

$8D 

; RETURN 

b 


607A: 



106 

★ 





lo 

607A: 



107 

* Punto 

di accesso dal BASIC 

con CALL 24698/Dest.in. ,Disabil. 

b 

607A: 
607A:20 

BE 

DE 

108 

109 

* 

JSR 

CHKCOM 

/•Ricerca la virgola. 

;Vkluta l'espressione. 


607D: 20 

67 

DD 

110 


JSR 

FRMNUM 



6080:20 

52 

E7 

111 


JSR 

GETABS 

/•Ottiene l'indirizzo in A e Y 


o 

6083:20 

91 

61 

112 


JSR 

QUANT 

;e controlla che sia diverso da 0. 

u 

6086:20 

B7 

00 

113 


JSR 

GOTCHAR 


608 9 :C9 

2C 


114 


CMP 

#$2C 

/•Controlla se c'e' la virgola. 


608B: DO 

OF 

60 9C 

115 


BNE 

OKINT 



o 

608D:20 

B1 

00 

116 


JSR 

GETCHAR 

;Se SI, la si salta 

o 

6090:20 

F8 

E6 

117 


JSR 

GETZPG 

;e si legge il valore che segue. 

6093 :EO 

00 


118 


CPX 

#00 


6095 :FO 

05 

60 9C 

119 


BEQ 

OKINT 



o 

6097 :A9 

03 


120 

NOINT 

LDA 

#$03 

;Se e' diverso da 0, 

fi 

6099:8D 

BE 

63 

121 


STA 

IGNOR+1 

;si ignorano gli altri interrupt. 

609C:A2 

08 


122 

OKINT 

LDX 

#08 

/•Nslot + 1. 


609E:A9 

00 


123 


LDA 

#$00 




60A0: 85 

3E 


124 


STA 

A2 



1 

60A2:A9 

C8 


125 


LDA 

# $C8 


o 

60A4: 85 

3F 


126 


STA 

A2 + 1 


60A6:C6 

3F 


127 

NEXTSLOT 

DEC 

A2 + 1 



60A8:CA 



128 


DEX 




0 : 

60A9: DO 

2D 

60D8 

129 


BNE 

OK2 

;Se X>0 controlla gli identificatori. 

p 

60AB: 20 

22 

FC 

130 


JSR 

VTAB 

60AE: 24 

D8 


131 


BIT 

$D8 

;Se l'ONERR non e' attivo 


60B0:10 

05 

60B7 

132 


BPL 

OKI 

/viene generato l'errore. 


o 

60B2:A2 

58 


133 


LDX 

#$58 

/Altrimenti il codice dell'errore 

b 

60B4.-4C 
60B7:E8 

E9 

F2 

134 

135 

OKI 

JMP 

INX 

ERRBASIC 

;e' 88 nella locaz. 222. 


60B8.-BD 

C6 

60 

136 


LDA 

NOTFOUND,X 



60BB:DO 

03 

60C0 

137 


BNE 

CONTI 



bj 

60BD:4C 

2A 

D4 

138 


JMP 

PRTERR 

/•Visualizza: ?MOUSE NOT FOUND ERROR 

o 

60C0:20 

ED 

FD 

139 

CONTI 

JSR 

COUT 


60C3:4C 

B7 

60 

140 


JMP 

OKI 



60C6:8D 



141 

NOTFOUND 

DFB 

$8D 



Di 

60C7:BF 

CD 

CF D5 

142 


ASC 

'7MOUSE 

NOT FOUND' 

o 

60CB:D3 
60CF:CF 

C5 

D4 

AO CE 

AO C6 







60D3:CF 
60D7:00 

D5 

CE C4 

143 


DFB 

$00 



5 

60D8:AO 

OC 


144 

0K2 

LDY 

#$0C 


o 

60DA:B1 

3E 


145 


LDA 

(A2) , Y 


60DC:C9 

20 


146 


CMP 

#$20 

/•Controlla se in CnOC c'e' $20. 


60DE: DO 

C6 

60A6 

147 


BNE 

NEXTSLOT 

; Se NO/ controlla ^il prossimo slot. 


D 

60E0:AO 

FB 


148 


LDY 

#$FB 

n 

60E2:B1 

3E 


149 


LDA 

(A2),Y 


60E4:C9 

D6 


150 


CMP 

#$D6 

/■Controlla se in CnFB c'e' $D6. 


60E6: DO 

BE 

60A6 

151 


BNE 

NEXTSLOT 

;Se NO, controlla il prossimo slot. 


Q 

60E8:8E 

86 

63 

152 


STX 

SL1 + 1 

/•Conserva il numero 

Q 

60EB:8E 

AC 

63 

153 


STX 

SL2+1 

/■dello slot del Mouse. 

60EE.-A5 

3F 


154 


LDA 

A2 + 1 

/Conserva il byte alto del 


60F0:8D 

OB 

62 

155 


STA 

CMD+2 



60F3:8D 

10 

62 

156 


STA 

CN+1 

/puntatore alla memoria di 


B 

60F6:8D 
60F9:OA 

17 

62 

157 

158 


STA 

ASL 

JSR+2 

;I/0 dello slot del Mouse. 

1 

60FA:OA 



159 


ASL 




60FB:OA 



160 


ASL 




o 

60FC:OA 



161 


ASL 

* 

;Nslot * 16. 

o 

60FD:8D 
6100:A2 

12 

01 

62 

162 

163 


STA 

LDX 

NO+1 

#1 



610 2 :BD 

F2 

03 

164 

LOOP 3 

LDA 

RESVECT,X 

/•Conserva i puntatori di RESET, 


B 

6105:9D 

D8 

63 

165 


STA 

RES+1,X 


o 

6108:BD 

F6 

03 

166 


LDA 

AMPVECT,X 

,-AMPERSAND e 

610B:9D 

70 

63 

167 


STA 

AMP+1,X 


610E:BD 

FE 

03 

168 


LDA 

IRQVECT,X 

,-richiesta di INTERRUPT. 



6111:9D 

D2 

63 

169 


STA 

IRQ+1,X 


1 


6114 :CA 
6115:10 

EB 

6102 

170 

171 


DEX 

BPL 

LOOP 3 

(Continua: Listato 1. Mr Mouse) 
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(Segue : Listato 1. 

Mr Mouse) 

LISTATI PER APPLE II 

Q 

6117 :A2 

4A 


172 

LDX 

#ENDTAB-RELOCTAB /Numero di istruzioni da rilocare. 


6119:86 

3C 


173 LOOP4 

STX 

Al 


o 

611B:BD 

AA 

61 

174 

LDA 

RELOCTAB,X ;Byte basso e 

g 

611E: 85 

3E 


175 

STA 

A2 

6120 :BD 

AB 

61 

176 

LDA 

RELOCTAB+1,X ;alto dell'indirizzo da rilocare. 


6123:85 

3F 


177 

STA 

A2 + 1 


0 

6125 :A0 

01 


178 

LDY 

#01 


6127 :B1 
6129:AA 

3E 


179 

180 

LDA 

TAX 

(A2),Y ; Lettura byte basso e 

0 


612A.-C8 



181 

INY 



612B:B1 

3E 


182 

LDA 

(A2),Y ;byte alto (relativo). 


d 

612D: 20 

AO 

61 

183 

JSR 

RELCALC ; Rilocazione. 

0 

6130:91 

6132:88 

3E 


184 

185 

STA 

DEY 

(A2),Y ; Nuovo byte alto e 


6133 :8A 



186 

TXA 



0 

6134:91 

3E 


187 

STA 

(A2),Y ; nuovo byte basso. 

9 

6136:A6 
6138 :CA 

3C 


188 

189 

LDX 

DEX 

Al 


6139 :CA 



190 

DEX 

;X>$7F se sono finite le rilocazioni. 

Q 

613A:10 

DD 

6119 

191 

BPL 

LOOP4 ; Se NO, continua a rilocare. 


613C: 08 
613D: 78 



192 

193 

PHP 

SEI 


o 

613E:A2 

DE 


194 

LDX 

#>RESET-BEGIN 


6140 :A9 

01 


195 

LDA 

# <RESET-BEGIN 


:G 

6142:20 

AO 

61 

196 

JSR 

RELCALC ; Riloca il puntatore del nuovo reset. 

d 

6145 : 8E 

F2 

03 

197 

STX 

RESVECT 

6148:8D 

F3 

03 

198 

STA 

RESVECT+1 


614B: 4 9 
614D:8D 
6150 :A9 

A5 
F 4 
4C 

03 

199 

200 

201 

EOR 

STA 

LDA 

# $A5 

RESVECT+2 

#$4C ;Aggiusta il puntatore del comando & 


D 

PI 

6152 :8D 

F5 

03 

202 

STA 

AMPVECT-1 


6155 :A5 

42 


203 

LDA 

A4 



6157 :8D 

F6 

03 

204 

STA 

AMPVECT 


p 

615A:A5 

43 


205 

LDA 

A4 + 1 

B 

615C:8D 

F7 

03 

206 

STA 

AMPVECT+1 

615F:A2 

B8 


207 

LDX 

#>INTERRUPT-BEGIN 


6161:A9 

01 


208 

LDA 

# CINTERRUPT-BEGIN 


0 

6163:20 

AO 

61 

209 

JSR 

RELCALC ; Riloca il puntatore dell'interrupt. 

9 

6166:8E 

FE 

03 

210 

STX 

IRQVECT 

6169:8D 

FF 

03 

211 

STA 

IRQVECT+1 


616C:A9 

F6 


212 

LDA 

#>BEGIN ; Byte basso ed 


d: 

616E: 8 5 

3C 


213 

STA 

Al 

O: 

6170:A9 

61 


214 

LDA 

#<BEGIN ;alto dell'indirizzo di inizio program. 

6172:85 

3D 


215 

STA 

Al + 1 

6174 :A9 

DA 


216 

LDA 

#>ENDPRG ; Byte basso ed 


6176:85 

3E 


217 

STA 

A2 


D 

6178:A9 

63 


218 

LDA 

#<ENDPRG ;alto dell'indirizzo di fine programma. 

pj 

617A:85 

3F 


219 

STA 

A2+1 

617C:A0 

00 


220 

LDY 

#00 


617E: 20 

2C 

FE 

221 

JSR 

MOVE ; Spostamento programma. 


Q 

6181:28 

6182:20 

OA 

00 

222 

223 FIRST 

PLP 

JSR 

INIT 

D 

6185:20 

22 

re 

224 

JSR 

VTAB 


6188 :2C 

DB 

63 

225 

BIT 

MODE ;I1 rilocatore e' stato eseguito da DOS? 

6 

618B:10 

01 

618E 

226 

BPL 

DOS ; Se SI, salto alla partenza a caldo. 


618D:60 



227 0K3 

RTS 

;Fine del programma. 

fi 

618E:4C 

DO 

03 

228 DOS 

JMP 

DOSWARM 

6191:84 

42 


229 QUANT 

STY 

A4 ;Pone Y ed A 


6193:C0 

01 


230 

CPY 

#1 ; rispettivamente in 


6; 

6195:85 

43 


231 

STA 

A4+1 ;$42 ed in $43, 

H 

6197 :A5 

43 


232 

LDA 

A4 + 1 ; controllando mentre 

6199 : DO 

F2 

618D 

233 

BNE 

OK3 ;che siano entrambi 


619B:BO 

FO 

618D 

234 

BCS 

OK3 ; diversi da zero. 


6 

619D:4C 

99 

E1 

235 

JMP 

ILLERR 

o 

61A0:4 8 



236 RELCALC 

PHA 

;Pone in X e in A i byte basso 

61A1:8A 



237 

TXA 

;ed alto del nuovo indirizzo 


61A2:18 



238 

CLC 

/calcolato dalla somma tra 



61A3:65 

42 


239 

ADC 

A4 /indirizzo relativo e indirizzo 


o 

61A5-.AA 
61A6: 68 



240 

241 

TAX 

PLA 

/di destinazione del programma. 

o 

61A7: 65 

43 


242 

ADC 

A4 + 1 


61A9:60 



243 

RTS 



fi 

61AA : 
61AA : 
61AA : 



244 * 

245 * Tabella degli indirizzi delle istruzioni da rilocare 

246 * 

Qj 


61AA: 82 

61 


247 RELOCTAB 

DW 

FIRST,FI,F2,F3,F4,F5,F6,F7, F8,F9 


| 

61AC: 02 
61AE: OC 
61B0:33 

62 

62 

62 





o; 

61B2:3 9 

62 







61B4:45 

62 






0 

61B6:4A 
61B8:4E 
61BA:57 

62 

62 

62 





O 


61BC.-5C 

62 






o 

61BE: 65 

62 


248 

DW 

F10,F11,F12,F13,F14,F15,F16,F17,F18 

6; 

61C0:6A 
61C2:6F 

62 

62 






61C4:78 

62 







61C6:83 

62 





Q 

fi 

61C8:C4 
61CA:D0 

62 

62 





61CC:D7 

62 







61CE:DC 

62 






p 

61D0:E6 

62 


249 

DW 

FI 9,YCOORD,F20,F21,F22,LOOP5,NORM 

fi 

61D2:EB 

62 
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o 


61D6:03 
61D8:06 
61DA:0B 
61DC: 11 

63 

63 

63 

63 









o 








io 


61DE : 1F 

63 


250 


DW 

F23,F24,F25, 

F26/F27/LOOP6/F28/F29 



o 

61E0:28 

63 









61E2:2E 
61E4:34 

63 

63 








6 


61E6: 40 

63 









61E8:4 5 

63 









o 

61EA:4B 
61EC: 51 

63 

63 








S 

61EE: 66 

63 


251 


DW 

F30 / F31 / F32 / 

RESET 



61F0:72 

63 









o 

61F2.-BA 
61F4:D4 
61F6 : 

63 

63 

61F4 

252 

ENDTAB 

EQU 

*-2 



D 


61F6 : 



253 


MSB 

OFF 




61F6 : 



254 

* 






D 

61F6: 
61F6 : 



255 

256 

* Gestore del MOUSE e degli 

* 

interrupt 


o 

61F6:20 

B7 

00 

257 

BEGIN 

JSR 

GOTCHAR 

/■Carattere successivo ad &. 



61F9:C9 

8C 


258 


CMP 

#$8C 

;Token di CALL ? 



:0 

61FB: DO 

22 

621F 

259 


BNE 

INT 

; Se NO, prossima istruzione. 


0 

61FD: 20 

B1 

00 

2 60 


JSR 

GETCHAR 


6200: 


OOOA 

261 

INIT 

EQU 

*-BEGIN 




6200 :AO 

19 


262 


LDY 

#$19 

;INITMOUSE 



0 

6202:20 

13 

00 

2 63 

FI 

JSR 

CALLFIRM 




6205: 


OOOF 

264 

RSET 

EQU 

*-BEGIN 



0 

6205:A9 

00 


265 


LDA 

#00 

/■Disattiva il Mouse. 


6207: 


0011 

266 

SET 

EQU 

*-BEGIN 




6207 :AO 

12 


267 


LDY 

#$12 

;SETMOUSE 



Q 

6209: 


0013 

268 

CALLFIRM 

EQU 

*-BEGIN 



i 

6209 :BE 

00 

C4 

269 

CMD 

LDX 

$C400,Y 



620C:8E 

20 

00 

270 

F2 

STX 

JSRFIRM+1 

;Byte basso dell'ingresso al Firmware. 



620F:A2 

00 


271 

CN 

LDX 

#00 

;Byte alto della memoria I/O. 



O 

6211 :AO 

00 


272 

NO 

LDY 

#00 

;Nslot * 16. 


0 

6213:08 

6214:78 



273 

274 


PHP 

SEI 





6215: 


001F 

275 

JSRFIRM 

EQU 

*-BEGIN 




o 

6215:20 

00 

00 

276 

JSR 

JSR 

$0000 

;Salta al Firmware del Mouse. 



6218:68 

6219:29 

04 


277 

278 


PLA 

AND 

#%00000100 

;Interrupt erano disabilitati? 


o 

621B: DO 

01 

621E 

279 


BNE 

DISAB 




621D: 58 



280 


CLI 


;Se NO, li attiva. 



o 

621E: 60 



281 

DISAB 

RTS 




0 

621F:C9 

D3 


282 

INT 

CMP 

#$D3 

;Token di INT ? 


62 21 : DO 

30 

6253 

283 


BNE 

READ 

; Se NO, prossima istruzione. 



6223:20 

B1 

00 

284 


JSR 

GETCHAR 



H 

6226:20 

BB 

DE 

285 


JSR 

CHKOPN 

/Controlla se c'e' la "(". 


Q 

6229:20 

F8 

E6 

286 


JSR 

GETZPG 

;Ottene valore minore di 256. 


622C:EO 

10 


287 


CPX 

#16 

/•Controlla se X>16. 



622E: 20 

22 

F2 

288 


JSR 

CTRLCARRY 

;Se si, ILLEG.QUANTITY.ERROR 



6231:8A 



289 


TXA 





o 

6232:48 

6233:20 

7F 

01 

290 

291 

F3 

PHA 

JSR 

CTRLCOM 

;C'e' la virgola ? 


O 

6236:08 



292 


PHP 





6237:D0 

03 

623C 

2 93 


BNE 

CTRLPAR 




Q 

6239:20 

AC 

01 

294 

F 4 

JSR 

NEXTFORM 

;SI? Valuta la formula per l'indirizzo. 


O 

623C: 20 
623F: 28 

B8 

DE 

295 

296 

CTRLPAR 

JSR 

PLP 

CHKCLS 

/Controlla se c'e' la 



6240:78 



297 


SEI 


,-Disabilita gli interrupt. 



B 

6241 : DO 

OA 

624D 

298 


BNE 

NOINDIR 

; Se non c'era la salta l'indirizzo. 


B 

6243:A5 

50 


299 


LDA 

VABS 



6245 :8D 

CA 

01 

300 

F5 

STA 

JSRINT+1 

/Byte basso ed 


6248 :A5 

51 


301 


LDA 

VABS+1 




624A:8D 

CB 

01 

302 

F6 

STA 

JSRINT+2 

/alto del programma da eseguire. 



o 

624D: 68 



303 

NOINDIR 

PLA 




D 

624E: 20 

11 

00 

304 

F7 

JSR 

SET 

/Setteggio del Modo Operativo del Mouse. 


6251:58 



305 


CLI 


/Abilita gli interrupt. 



6252:60 



306 


RTS 





B 

6253:C9 

87 


307 

READ 

CMP 

#$87 

;Token di READ ? 


o 

6255:D0 

73 

62CA 

308 


BNE 

CLEAR 

;Se NO/ Prossima istruzione. 


6257:20 

6E 

01 

309 

F8 

JSR 

RDMOUSE 

/■READMOUSE 



62 5A:FO 

09 

6265 

310 


BEQ 

FIO 

;Se c'e' una salta il parametro X. 

/Ricerca l'inizio della 1' variabile 




625C: 20 

85 

01 

311 

F9 

JSR 

PTRVAR 


o 

a 

62 5F-.BE 

78 

04 

312 


LDX 

XL, Y 



62 62 :B9 

78 

05 

313 


LDA 

XH, Y 



6265:20 

7C 

01 

314 

FIO 

JSR 

PUTÌ 

;e le assegna la coordinata X del Mouse. 



6268:D0 

5D 

62C7 

315 


BNE 

EXIT1 

/Fine se non c'e' la virgola. 



ò : 

62 6A: 20 

73 

01 

316 

FU 

JSR 

GETCOM 

/Controlla se c'e' una virgola. 


o 

62 6D:FO 

OE 

627D 

317 


BEQ 

NEXT2 

; Se SI, salta il parametro Y. 


62 6F: 20 

85 

01 

318 

F12 

JSR 

PTRVAR 

/Ricerca l'inizio della 2' variabile 



6272 :BE 

F8 

04 

319 


LDX 

Y.L, Y 


\ 


Q: 

6275 :B9 

F8 

05 

320 


LDA 

YH, Y 


o 

6278:20 

7C 

01 

321 

F13 

JSR 

PUTÌ 

;e le assegna la coordinata Y del Mouse. 


627B: DO 

4A 

62C7 

322 


BNE 

EXIT1 

,-Fine se non c'e' una virgola. 


627D: 20 

B1 

00 

323 

NEXT2 

JSR 

GETCHAR 

/Salta la virgola. 

/Ricerca dell'inizio della variabile 




6280:20 

E3 

DF 

324 


JSR 

PTRGET 


o 

0 

6283:20 

8B 

01 

325 

F14 

JSR 

VECT 

;per lo stato del Mouse. 


6286 :BE 

78 

07 

326 


LDX 

STATO,Y 



6289:A9 

00 


327 


LDA 

#$00 




628B: 24 

11 


328 


BIT 

STRING 

;E' una stringa ? 



O 

628D:10 

35 

62C4 

329 


BPL 

F15 

; NO? Allora assegna un valore numerico. 


0 
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628F 

86 

AO 


330 


STX 

FAC+3 



6291 

A0 

02 


331 


LDY 

#$02 


a 

6293 

B1 

85 


332 


LDA 

(FORPNT),Y 

; Conserva il Byte alto del 

/puntatore alla stringa. jji 

6295 

6297 

85 

88 

9F 


333 

334 


STA 

DEY 

FAC+2 


6298 

B1 

85 


335 


LDA 

(FORPNT), Y 

;ed il byte basso del 


62 9A 

85 

9E 


336 


STA 

FAC+1 

/puntatore alla stringa. W&M 

g 

62 9C 
629D 

88 

B1 

85 


337 

338 


DEY 

LDA 

(FORPNT),Y 

/legge la lunghezza della stringa e 

629F 

C9 

08 


339 


CMP 

# $8 

/controlla che sia maggiore di 7. 


62A1 

A9 

08 


340 


LDA 

# $8 

□ 

6 2 A3 

91 

85 


341 


STA 

(FORPNT),Y 

/Pone la lunghezza a 8 caratteri. WV: 
/ Se maggiore, riscrive su essa. Jl; 
/Altrimenti abbassa l'area di memoria 

62A5 

BO 

OD 

62B4 

342 


BCS 

OKLEN 

62A7 

20 

DD 

E3 

343 


JSR 

NEWSTRNG 


62AA 

98 



344 


TYA 


/riservata alle stringhe. 

o 

62AB 

AO 

02 


345 


LDY 

#$02 

62AD 

62AF 

91 

88 

85 


346 

347 


STA 

DEY 

(FORPNT), Y 

/Conserva il byte alto e quello 

62B0 

8A 



348 


TXA 



62B1 

91 

85 


349 


STA 

(FORPNT), Y 

/basso della nuova stringa. 

0 

62B3 

62B4 

88 

A9 

00 


350 

351 

OKLEN 

DEY 

LDA 

#00 

□ 

/Prende un bit del byte di stato, llwslil; 

62B6 

06 

AO 


352 


ASL 

FAC+3 


62B8 

2A 



353 


ROL 


/lo pone nell'accumulatore, W8M 

o 

62B9 

09 

30 


354 


ORA 

#$30 

/somma 48 (per il codice ASCII) e 

/ripone il numero nella stringa. Jl; 

62BB 

62BD 

91 

C8 

9E 


355 

356 


STA 

INY 

(FAC+1),Y 


62BE 

CO 

08 


357 


CPY 

#$08 


0 

62C0 

90 

F2 

62B4 

358 


BCC 

OKLEN 

/Ripete questo per 8 volte. 

62C2 

BO 

03 

62C7 

359 


BCS 

EXIT1 

/Fine istruzione. 

/Assegna il valore alla variabile. 

62C4 

20 

92 

01 

360 

F15 

JSR 

PUT2 

62C7 

4C 

B7 

00 

361 

EXIT1 

JMP 

GOTCHAR 


62CA 

C9 

BD 


362 

CLEAR 

CMP 

# $BD 

/Token di CLEAR ? ||||| 

o 

62CC 

DO 

05 

62D3 

363 


BNE 

POS 

/Se NO, prossima istruzione. iS^s&l 

/CLEARMOUSE ;[ J 

62CE 

AO 

15 


364 


LDY 

#$15 

62D0 

4C 

70 

01 

365 

F16 

JMP 

RDMOUSE+2 


62D3 

C9 

D9 


366 

POS 

CMP 

# $D9 

/Token di POS ? 1111 

o 

62D5 

DO 

26 

62FD 

367 


BNE 

CLAMP 

/Se NO, prossima istruzione. Ijlpip 
/READMOUSE f jl; 
/Se c'e' una salta il parametro X. 

62D7 

20 

6E 

01 

368 

F17 

JSR 

RDMOUSE 

62DA 

FO 

OF 

62EB 

369 


BEQ 

YCOORD 


62DC 

20 

AF 

01 

370 

F18 

JSR 

CALCFORM 

/Valuta la formula. I; ,! 


62DF 

9D 

78 

05 

371 


STA 

XH, X 

/Conserva il byte alto e quello 

a 

62E2 

62E3 

98 

9D 

78 

04 

372 

373 


TYA 

STA 

XL/ X 

/basso della nuova coordinata X. I^^);: 

/Controlla se c'e' una virgola. l*!:!:: 

62E6 

20 

7F 

01 

374 

F19 

JSR 

CTRLCOM 


62E9 

DO 

OA 

62F5 

375 


BNE 

EXIT2 

/Se NO, salta il parametro Y. 

o 

62EB 

20 

AC 

01 

376 

YCOORD 

JSR 

NEXTFORM 

/Valuta la formula dopo la virgola. I;:l£££:;: 

/Conserva il byte alto e quello ;{ jl; 

62EE 

62F1 

9D 

98 

F8 

05 

377 

378 


STA 

TYA 

YH, X 


62F2 

9D 

F8 

04 

379 


STA 

YL,X 

/basso della nuova coordinata Y. Wtfti 

o 

62F5 

AO 

16 


380 

EXIT2 

LDY 

#$16 

/ POSMOUSE 

62F7 

20 

13 

00 

381 

F20 

JSR 

CALLFIRM 

/Trasferisce le nuove coordinate al Mouse. 

/Fine istruzione. 

62FA 

4C 

B,7 

00 

382 


JMP 

GOTCHAR 

62FD 

C9 

C7 

—• 

383 

CLAMP 

/CMP 

BNE 

#$C7 

/Token di STEP ? |$:|:::|| 


62FF 

DO 

3B 

633C 

384 


END 

/Se NO, prossima istruzione. 

0 

6301 

A9 

00 


385 


LDA 

#$00 

/Se 0=coord.X / se l=coord.Y. 

/Il prossimo carattere e' una virgola ? :l:^x|:l| 

6303 

8D 

E4 

01 

386 

F21 

STA 

COORD 

6306 

20 

73 

01 

387 

F22 

JSR 

GETCOM 


6309 

DO 

06 

6311 

388 


BNE 

NORM 

0 

630B 

EE 

E4 

01 

389 

LOOP 5 

INC 

COORD 

/Se SI, incrementa il Flag COORD. 

/Salta la virgola. jl; 

/Valuta la formula ed 

630E 

20 

B1 

00 

3 90 


JSR 

GETCHAR 

6311 

20 

AF 

01 

391 

NORM 

JSR 

CALCFORM 


6314 

8C 

78 

04 

392 


STY 

XL 

/ assegna il byte basso e quello WWM 

Ej 

6317 

8D 

78 

05 

393 


STA 

XH 

/alto del confine inferiore al Mouse. 

631A 

A9 

CI 


394 


LDA 

#$C1 

/Controlla il Token di TO 

/con il carattere puntato da ($B8). 

631C 

20 

CO 

DE 

395 


JSR 

CHKA 

631F 

20 

AF 

01 

396 

F23 

JSR 

CALCFORM 

/Valuta la formula ed W80& 


6322 

8C 

F8 

04 

397 


STY 

YL 

/assegna il byte basso e quello 

o 

6325 

8D 

F8 

05 

398 


STA 

YH 

/alto del confine superiore al Mouse. lli^&l: 

Q 

6328 

632B 

AD 

48 

E4 

01 

399 

400 

F24 

LDA 

PHA 

COORD 


632C 

AO 

17 


401 


LDY 

#$17 

/ CLAMPMOUSE 

g 

632E 

20 

13 

00 

402 

F25 

JSR 

CALLFIRM 

/Stabilisce i nuovi confini. jiplp 

/Se COORD=l l'istruzion e' finita. il***#; 

6331 

6332 
6334 
6337 
6339 

68 

DO 

20 

FO 

4C 

05 

7F 

D2 

B7 

6339 

01 

630B 

00 

403 

404 

405 

406 

407 

F26 

PLA 

BNE 

JSR 

BEQ 

JMP 

EXIT3 

CTRLCOM 

LOOP 5 

GOTCHAR 


/Controlla se c'e' una virgola. 

/Se SI, legge i confini alti. i:i:®lili:? 

/Fine istruzione. 

/Token di END ? 

0 

EXIT3 

END 

633C 

633E 

C9 

DO 

80 

1D 

635D 

408 

409 

CMP 

BNE 

#$80 

HOME 


F27 

/Se NO, prossima istruzione. I;:;;;:;:;:;!;:;:;: 


6340 

20 

OF 

00 

410 

JSR 

RSET 

. /Disattiva il Mouse. 

y 

6343 

6345 

A2 

BD 

01 

E2 

01 

411 

412 

LOOP 6 

LDX 

LDA 

#1 

OLDRES+1,X 

/Rimette a posto i puntatori di ... ;f Jl; 

6348 

9D 

F2 

03 

413 


STA 

RESVECT,X 

/reset, 


634B 

BD 

7A 

01 

414 

F28 

LDA 

OLDAMP+1/X 


d 

634E 

9D 

F,6 

03 

415 


STA 

AMPVECT,X 

zampe rsande 

6351 

BD 

DC 

01 

416 

F29 

LDA 

OLDIRQ+1,X 

/richieste di interrupt. tfjwxéi 

6354 

6357 

6358 

9D 

CA 

10 

FE 

03 

417 

418 

419 


STA 

DEX 

BPL 

IRQVECT,X 


EB 

6345 


LOOP 6 

/Ciclo per la parte bassa. 

pi 

63 5A 

4C 

Bl 

00 

420 


JMP 

GETCHAR 

/Fine istruzione. 

/Token di HOME ? 

lì 

635D 

C9 

97 


421 

HOME 

CMP 

#$97 

Ay. 

635F 

DO 

OE 

636F 

422 


BNE 

AMP 

/Se NO, salta al vecchio vettore &. 


6361 

AO 

18 


423 


LDY 

#$18 

/HOMEMOUSE 

d 

6363 

2C 



424 


DFB 

$2C 

/Salta la prossima istruzione. 

(Continua: Listato 1. Mr Mouse) 

6364 



016E 

425 

RDMOUSE 

EQU 

*-BEGIN 
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(Segue: Listato 1. Mr Mouse) 


LISTATI PER APPLE II 



63 64 : AO 

14 


426 


LDY 

#$14 

0 

6366/20 

13 

00 

427 

F30 

JSR 

CALLFIRM 

6369: 


0173 

428 

GETCOM 

EQU 

*-BEGIN 

6369:20 

B1 

00 

429 


JSR 

GETCHAR 


636C:C9 

2C 


430 


CMP 

# ', ' 


63 6E: 60 



431 


RTS 


6 

63 6F: 


0179 

432 

OLDAMP 

EQU 

*-BEGIN 

63 6F:4C 

00 

00 

433 

AMP 

JMP 

$0000 

6372: 



434 

* 




6372: 


017C 

435 

PUTÌ 

EQU 

*-BEGIN 

o 

6372:20 

92 

01 

436 

F31 

JSR 

PUT2 

6375: 


017F 

437 

CTRLCOM 

EQU 

*-BEGIN 

6375:20 

B7 

00 

438 


JSR 

GOTCHAR 


6378:C9 

2C 


439 


CMP 

# ' 


637A: 60 



440 


RTS 


b 

637B : 
637B : 


0185 

441 

442 

* 

PTRVAR 

EQU 

*-BEGIN 

637B: 20 

E3 

DF 

443 


JSR 

PTRGET 


637E: 20 

6A 

DD 

444 


JSR 

CHKVAR 

o 

6381: 


018B 

445 

VECT 

EQU 

*-BEGIN 

6381:85 

85 


446 


STA 

FORPNT 

6383:84 

86 


447 


STY 

FORPNT+1 


6385:A0 

00 


448 

SL1 

LDY 

#00 

o 

6387:60 



449 


RTS 


6388: 



450 

* 



6388: 


0192 

451 

PUT2 

EQU 

*-BEGIN 


6388 :A0 

00 


452 


LDY 

#$00 


638A.-24 

12 


453 


BIT 

VARINT 

p 

63 8C:10 

07 

6395 

454 


BPL 

REALE 

638E: 91 

85 


455 


STA 

(FORPNT),Y 

6390:C8 



456 


INY 



63 91 :8A 



457 


TXA 


Q 

6392:91 

85 


458 


STA 

(FORPNT), Y 

6394:60 



459 


RTS 


6395:85 

9E 


460 

REALE 

STA 

FAC+1 


6397:86 

9F 


461 


STX 

FAC+ 2 

Ò 

63 99 :A2 

90 


462 


LDX 

#$90 

63 9B: 38 



4 63 


SEC 


63 9C: 20 

A0 

EB 

464 


JSR 

FLOAT2 


63 9F:4C 

27 

EB 

465 


JMP 

MOVMF 


63A2 : 



466 

* 



o 

63A2 : 


01AC 

467 

NEXTFORM 

EQU 

*-BEGIN 

63A2: 20 

B1 

00 

468 


JSR 

GETCHAR 

63A5 : 


01AF 

469 

CALCFORM 

EQU 

*-BEGIN 


63A5:20 

67 

DD 

470 


JSR 

FRMNUM 

Q 

63A8:20 

52 

E7 

471 


JSR 

GETABS 

63AB:A2 

00 


472 

SL2 

LDX 

#00 

63AD:60 



473 


RTS 



63AE : 



474 

★ 




63AE:A5 

45 


475 

INTERRUPT 

LDA 

REG 

0 

63B0:48 



476 


PHA 


63B1:A5 

35 


477 


LDA 

YSAVE 

63B3:48 



478 


PHA 



63B4:8A 



479 


TXA 


O 

63B5:48 



480 


PHA 


63B6: 98 



481 


TYA 


63B7-.48 



482 


PHA 



63B8.-A0 

13 


483 


LDY 

#$13 

Q 

63BA:20 

13 

00 

484 

F32 

JSR 

CALLFIRM 

63BD:B0 

OC 

63CB 

485 

IGNOR 

BCS 

OTHERINT 

63BF : 


01C9 

486 

JSRINT 

EQU 

*-BEGIN 


63BF: 20 

00 

00 

487 


JSR 

$0000 


63C2-.68 



488 


PLA 


n 

63C3:A8 



489 


TAY 


63C4.-68 



490 


PLA 


63C5-.AA 



491 


TAX 



63C6: 68 



4 92 


PLA 


o 

63C7:85 

35 


4 93 


STA 

YSAVE 

63C9: 68 



494 


PLA 


63CA: 4 0 



495 


RTI 



63CB:68 



496 

OTHERINT 

PLA 


O; 

63CC:A8 



4 97 


TAY 


63CD: 68 



498 


PLA 


63CE:AA 



499 


TAX 



63CF: 68 



500 


PLA 



63D0: 68 



501 


PLA 


O 

63D1 : 


01DB 

502 

OLDIRQ 

EQU 

*-BEGIN 

63D1.-4C 

00 

00 

503 

IRQ 

JMP 

$0000 

63D4:20 

0A 

00 

504 

RESET 

JSR 

INIT 


63D7 : 


01E1 

505 

OLDRES 

EQU 

*-BEGIN 

8 

63D7 : 4C 

00 

00 

506 

RES 

JMP 

$0000 

63DA: 


01E4 

507 

COORD 

EQU 

*-BEGIN 

63DA : 


0001 

508 

ENDPRG 

DS 

$01 


63DB : 


0001 

509 

MODE 

DS 

$01,$80 

o 








o: 








o 









; READ!' : 

;Ottier,-. • altro carattere e 
; contro. se e' una virgola. 

; Salta <j.l vecchio vettore Ampersand. 


/Assegna valore alla variabile. 

/Prende un carattere e 
/controlla se e* una virgola. 


/Ricerca il puntatore alla variabile, 
/controlla che non sia una stringa e 

/conserva il byte basso e 
/quello alto. 

/Slot del Mouse. 


/La variabile e' reale ? 

/Se S^ f assegna valore in formato reale. 
/Assegna byte basso e 


/byte alto alla variabile intera. 

/Ripone byte basso e 
/byte alto nel FAC, 


/lo trasforma in reale e 

/lo assegna alla variabile reale. 


/Salta un carattere. 

/Valuta la formula. 

/Prende il valore dal FAC. 
/Slot del Mouse. 


/Conserva il valore dell'accumulatore e 

/quello contenuto in $35 che e' 
/utilizzato dal PRINT. 

/Conserva X 

/e Y. 

/SERVEMOUSE 

/Il Mouse ha generato l'interrupt ? 

/NO? Salta al vecchio vettore Interrupt. 

/Salta al programma. 

/Riprende Y, 


;x. 


/il valore che era in $35 e 
/1'accumulatore. 

/Fine interrupt. 


D 

o 

o 

o 

3 

s 

b 

2 

3 

SS 

2 

3 

8 

b 

b 

H 

fl 


/Vecchio vettore per gli.interrupt. 
/Riabilita la scheda del’Mouse. 



/Salta 


(Fine) 



Checksum del listato 1 

NOME FILE: 

MR.MOUSE 

TIPO: B 


LUNGHEZZA: 

03DF 

CHECKSUM : 

0B 



□ 
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o 

Q: 

Ò 

O 

g 

o 

o 

O; 

Q 

q 

0 

O: 

D 

n 

ò 

3 

3 

0 

O 

O 

0 

Q 


LISTATI PER APPLE II 


Listato 2. Mouse.Demo 


10 REM - 

20 REM MOUSE.DEMO di 
30 REM MAURIZIO ROMEO 
40 REM (C)1987 by Applicando 

50 REM ■- 

60 : 

70 PRINT CHR$ (4)"BLOAD MR.MOUSE": CALL 24698, 
16384,1 

80 & INT (1,65368) 

90 HOME : & STEP 0 TO 1023,0 TO 1023: HTAB 15: 
PRINT "MOUSE.DEMO" 

100 VTAB 22: PRINT " (C) CLEAR (H) HOME (P) P 

OS (S) STEP (I) INT (RTN) USCITA": POKE 
35,21 

110 VTAB 4: PRINT "Modo Operativo : 1": PRINT : 

PRINT "Confini di X : 0,1023": PRINT "Conf 
, ini di Y : 0,1023" 

120 VTAB 10: PRINT "Posizione orizzontale :": V 
TAB 13: PRINT "Posizione verticale :": VTAB 
16: PRINT "Stato del Mouse :": POKE 34,17 
130 & READ A,B,C$: VTAB 10: HTAB 25: PRINT A" 

": VTAB 13: HTAB 23: PRINT B" ": VTAB 
16: HTAB 19: PRINT C$ 

140 ON PEEK (49152) < 128 GOTO 130: GET A$: IF 
A$ = CHR$ (13) THEN : TEXT : VTAB 20: & 
END : END 

150 IF A$ = "C" THEN & CLEAR : GOTO 130 
160 IF A$ = "H" THEN & HOME : GOTO 130 


DOS 3.3 
ProDOS 

Apple Me 
Apple He 


170 VTAB 19: ON A$ < > "P" GOTO 200: INPUT "Po 

si Z :. l - X, Y : " ;X$, Y$ : IF X$ < > "" THEN 

& POS VAL (X$) 

180 IF Y$ < > "" THEN & POS , VAL (Y$) 

190 GOTO 260 

200 ON A$ < > "S" GOTO 240: INPUT "CONFINI XI, 

X2 , Y1,Y2 :";X1$,X2$,Y1$,Y2$ 

210 IF Xl$ < > "" AND X2$ < > "" THEN & STE 

P VAL (Xl$) TO VAL (X2$): VTAB 6: HTAB 16 
: PRINT Xl$","X2$" 

220 IF Yl$ < > "" AND Y2$ < > "" THEN & STE 

P , VAL (Yl$) TO VAL (Y2$): VTAB 7: HTAB 1 
6: PRINT Yl$","Y2$" 

230 GOTO 260 

240 ON A$ < > "I" GOTO 130: INPUT "Modo Oper 

tivo :";A$:A = VAL (A$) 

250 IF A < 16 AND A$ < > "" THEN & INT (A): 

VTAB 4: HTAB 18: PRINT A" " 

260 VTAB 17: CALL - 958: GOTO 130 


(Fine) 


Checksum del listato 2 

NOME FILE: MOUSE.DEMO 
TIPO: A 

LUNGHEZZA: 034C 
CHECKSUM : 06 


Listato 3. Mouse.Games 


1 REM- 

2 REM MOUSE.GAMES 

3 REM di 

4 REM MAURIZIO ROMEO 

5 REM 

6 REM COPYRIGHT 1987 

8 REM by APPLICANDO 

9 REM- 

10 IRQ = PEEK (1022) + PEEK (1023) * 256 

20 IF PEEK (IRQ) < > 165 OR PEEK (IRQ + 2) < 
> 72 OR PEEK (IRQ + 6) < > 138 THEN PRI 

NT CHR$ (4);"BLOAD MR.MOUSE": CALL 24698,16 
384,T' . 


30 

& INT 

(1): & STEP 0 TO 

399,0 TO 

229: & CL 


EAR 





40 

CLEAR 

: DIM N(15) 




50 

G$ (1) 

= " QUINDICI 

" : G$(2) = " 

DAMA INGL. 


" :G$(3) = " DAMA 

FRANC. 

":RI$ = 

"1 1 

60 

TEXT : 

GOSUB 180 




70 

GOSUB 

820: IF CM = 

1 THEN 

‘GOSUB 

220 

80 

ON CM 

= 2 GOTO 100 

: GOTO 

70 


90 

: 





100 

REM 

- Scelta 

Gioco 



110 






120 

GOSUB 

180 




130 

VTAB 

1: HTAB 10: 

PRINT " 

GAMES " 

: INVERSE : 


HTAB 10: PRINT " ": NORMAL : F 

OR F = 1 TO 3: HTAB 10: IF F < > G THEN I 

NVERSE 

140 PRINT G$(F): NORMAL : NEXT : HTAB 10: INVER 
SE : PRINT " ": NORMAL :OC$ = " 

150 GOSUB 820: ON (CM = 3) * G GOTO 310,570,570 
: IF CM = 1 THEN GOSUB 220: GOTO 130 

160 ON (PX < 9 OR PX > 21 OR PY < 2 OR PY > 4) 

GOTO 150:G = PY - 1 : GOSUB 180: ON G + 3 * 

G(G) GOTO 320,580,580,340,620,620: GOSUB 73 
0: GOTO 590 

170 : 

180 REM -Testo- 

190 : 

200 VTAB 1: HTAB 1: INVERSE : PRINT 
- INFO GAMES NEW END 
NORMAL : VTAB 2: CALL' - 95 8:OC$ 

RN 

210 : 

220 - REM -Info- 

230 : 

240 GOSUB 180: VTAB 1: HTAB 3: PRINT 
VTAB 5 

250 PRINT TAB( 13)" 

B( 12)"I I": PRINT 


| MOUSE.GAMES |": PRINT TAB( 12)"| 

I" 

260 VTAB 12: PRINT TAB( 11);"Maurizio Seb. Rora 
eo": PRINT : PRINT TAB( 14);"Augusta (SR) 
": PRINT : PRINT TAB( 14);"Febbraio 1987": 
VTAB 20: PRINT TAB( 7);"Copyright (C) by 
Applicando" 

270 GOSUB 820: ON CM = 1 GOTO 270: GOSUB 180: R 


ETURN 
280 : 

290 REM -Quindici- 

300 : 

310 GOSUB 180 

320 G (1) = 1: FOR F = 0 TO 15:N(F) = 0: NEXT : 

FOR Y = 0 TO 3: FOR X = 0 TO 3 
330 C = INT ( RND (1) * 16): ON N(C) GOTO 330: 

SC(1,X,Y) = C:N(C) = 1: NEXT X,Y 
340 GOSUB 430 
350 OC$ = "" 

360 GOSUB 820: IF CM = 1 THEN GOSUB 220: GOSUB 
430: GOTO 360 


370 ON (CM - 1) * (CM > 1) GOTO 130,320: ON (PX 
< 11 OR PX > 26 OR PY < 7 OR PY > 18) GOTO 
360 

380 PX = INT ((PX - 11) / 4):PY = INT ((PY - 

7) / 3): ON (PX < > VX AND PY < > VY OR P 

X = VX AND PY = VY) GOTO 360 
390 IF PY = VY THEN Y = VY:SG = SGN (PX - VX): 

FOR X = VX TO PX - SG STEP SG:C = SC(1,X + 

SG,Y): GOTO 410 

400 X = VX:SG = SGN (PY - VY): FOR Y = VY TO P 
Y - SG STEP SG:C = SC(1,X,Y + SG) 

410 SC(1,X,Y) - C: GOSUB 500: NEXT :SC(1,X,Y) = 
0:C = 0: GOSUB 500: GOTO 350 

420 : 

430 REM -Riquadro- 

440 : 

450 GOSUB 920: VTAB 5: HTAB 10: PRINT " 

": HTAB 9: PRINT "| 

I^T'VTAB 20: HTAB 9: PRINT ' ’* | | 
_ [|": HTAB 9: PRINT "|_ 


460 

VTAB 7: FOR F = 1 TO 

13: HTAB 9: PRINT RI$: 


NEXT : FOR Y = 0 TO 

3: FOR X = 0 TO 3:C = 


SC (1, X, Y) 

: GOSUB 500: 

NEXT X,Y: RETURN 

470 




480 

REM - 

- Caselle — 


490 




500 

VTAB Y * 

3 + 8 : XX = X 

* 4 + 12 : IN = C + (C 


- 1) / 4: 

IF 1 - INT 

(IN - INT (IN / 2) * 


2) THEN 

INVERSE 


510 

HTAB XX: 

PRINT " 

: HTAB XX: IF C = 0 TH 


EN PRINT 

" ":vx = 

X:VY = Y: GOTO 530 

520 

PRINT " " 

; CHR$ (48 * 

(C < 10));C" " 

530 

HTAB XX: 

PRINT " 

: NORMAL : RETURN 

540 




550 

REM - 

- Dama - 


560 




570 

GOSUB 180 




DOS 3.3 
ProDOS 

Apple Ile 
Apple Ile 


CHR$ (17)" 
= "": RETU 

" INFO ": 

: PRINT TA 
TAB( 12)" 


(Continua: Listato 3. Mr Mouse) 
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o 

o 

’O 

o 

DI 

o 

o 

o 

o 

o 

o 

o 

o 

o 

5 


Di 


(Segue: Listato 3. Mr Mouse) 


LISTATI PER APPLE II 


580 

590 

600 

610 

620 

630 

640 

650 

660 

670 

680 

690 


700 

710 

720 

730 

740 


750 

760 


= 0 : 


GOSUB 220: GOSUB 


G(G) =2: FOR Y = 0 TO 6: FOR X = 0 TO 6 :SC 
(G,X,Y) = 1: NEXT X,Y: GOSUB 730:A$ = " " 
VTAB 5: HTAB 2: PRINT "ELIMINA": GOSUB 820: 
IF CM = 1 THEN GOSUB 220: GOSUB 730: GOTO 
590 

ON (CM - 1) * (CM > 1) GOTO 130,580: IF DD 
THEN IF SC(G,DX,DY) THEN SC(G,DX,DY) 

GOSUB 800: GOTO 590 
G(G) =1: VTAB 5: HTAB 2: PRINT " 

GOTO 630 
GOSUB 730 

GOSUB 820: IF CM = 1 THEN 
730: GOTO 630 
ON (CM - 1) * (CM > 1) GOTO 130,580: ON DD 
= 0 GOTO 630: ON SC(G,DX,DY) = 0 GOTO 630:A 
$ = "O": INVERSE : GOSUB 800:SX = DX:SY = D 
Y 

GOSUB 820: IF CM = 1 THEN GOSUB 220: GOSUB 
730: GOTO 650 

ON (CM - 1) * (CM > 1) GOTO 130,580: ON 
= SX AND DY = SY) OR DD = 0 GOTO 650:X 
SX + DX) / 2:Y = (SY + DY) / 2 
IF (DX = SX AND (DY = SY - 2 OR DY = SY + 2 
) OR DY = SY AND (DX = SX - 2 OR DX = SX + 
2)) AND SC(G,X,Y) = 1 AND SC(G,DX,DY) = 0 T 
HEN 690 

ON SC (G,DX,DY) = 0 GOTO 650: INVERSE : GOSU 
B 800 : X = DX:Y = DY:DX = SX:DY = SY: GOSUB 
800 :SX = X:SY = Y: GOTO 650 

SC(G,DX,DY) = 1:SC(G,SX,SY) = 0:SC(G,X,Y) = 
0: GOSUB 80 0:DX = SX:DY = SY:A$ = " ": GOS 
UB 800:DX = X:DY = Y: GOSUB 800: GOTO 630 


(DX 
= ( 


REM 


Scacchiera 


GOSUB 920: VTAB 5: HTAB 18: PRINT " ": 

VTAB 20: HTAB 18: PRINT " 

FOR X = 0 TO 4: VTAB X + 6: HTAB 17 - X: PR 
INT HTAB 23 + X: PRINT "\": VTAB 20 - 

X: HTAB 17 - X: PRINT "V';: HTAB 23 + X: P 
RINT "/": NEXT 

VTAB 11: FOR X = 1 TO 5: HTAB 12: PRINT "|" 
;: HTAB 28: PRINT "I": NEXT 

VTAB 7 :F = 3 - G: FOR Y = 0 TO 6:F = F + (( 
Y < 3) - (Y > 4) ) * (G - 2) + 2 * ( (Y = 2) 

- (Y = 5)) * (3 - G): HTAB 20 - F * 2: FOR 
X = 3 - F TO 3 + F: PRINT CHR$ (32-+ 47 * 
SC(G,X,Y));" NEXT X: PRINT : PRINT : NE 


770 

780 

790 

800 

810 

820 

830 

840 


850 


860 

870 


880 
8 90 


900 

910 

920 

930 

940 

950 


XT Y: RETURN 
REM -Pioli 


VTAB 7 + DY * 2: HTAB 14 + DX 
NORMAL :OC$ = RETURN 


2: PRINT A$ 


REM 


Cursore 


& READ PX,PY,ST$:PX = INT (PX / 10):PY = 
INT (PY / 10):CAR * SCRN( PX,PY * 2) + S 
CRN ( PX,PY *2 + 1) * 16:AS = CAR > 127: IF 
PX = OX AND PY = OY AND CAR - 128 * AS = 4 
3 THEN 860 

GOSUB 920 : NO = AS:OC$ = " + ":OX = PX:OY = PY 
: GOSUB 920 :OC$ = CHR$ (CAR + 64 * (CAR < 
32) - 128 * NO) 

ON LEFT$ (ST$,1) = "0" GOTO 840 

1 AND PX < 8) + 2 * 

3 * (PX > 16 AND PX 
< 28)): IF CM = 
END : END 

/ 2) :DY = INT ( (PY - 


((PX 

16) 


CM = (PY = 0) 

(PX > 8 AND PX 
< 22) + 4 * (PX > 22 AND PX 
4 THEN POP : GOSUB 920: & 
INT ( (PX - 13) 

/ 2 ) 


DX 

6 ) 


DD = (PX > 12 AND PX < 
INT 


26 AND PY 
(PX / 2) 


5 AND PY 
2 AND PY 
< 5 


<19 AND PX < 

= INT (PY / 2) * 2) AND (DX > 1 AND DX 
OR DY > 1 AND DY < 5 OR G - 2 AND DX > 
ND DX < 6 AND DY > 0 AND DY < 6) 

RETURN 


0 A 


REM 


Carattere 


VTAB OY + 1: HTAB OX + 1 : ON NO GOTO 950 : I 
NVERSE 

PRINT OC$;: NORMAL : RETURN 


(Fine) 


Checksum del listato 3 

NOME FILE: 

MOUSE.GAMES 

TIPO: A 


LUNGHEZZA: 

0C3D 

CHECKSUM : 

43 


Listato 4. Mouse.Time 


0000 : 

0000 : 

0000 : 

0000 : 

0000 : 

oooo: 

0000 : 


LST ON, NOA, G 

* TIME * 

* di Maurizio S.Romeo * 

* Copyright 1987 by * 

* APPLICANDO * 

***★****★★★****★■*★★★■*■*■* 


DOS 3.3 


ProDOS 


Apple Ile 


Apple Ile 



0000: 



8 * 



§ 

0000: 


0024 

9 CH 

EQU 

$24 

0000: 


0025 

10 CV 

EQU 

$25 

0000: 


0032 

11 MODE 

EQU 

$32 


0000: 


FB5B 

12 VTAB 

EQU 

$FB5B 

D 

0000: 


FDF0 

13 PRINT 

EQU 

$FDF0 

0000: 

0000: 



14 

15 * 

MSB 

ON 

-NEXT 

OBJECT 

FILE NAME IS 

MOUSE. 

, TIME 


0300: 


0300 

16 

ORG 

$300 

B 

0300: 
0300 :EE 

04 

03 

17 * 

18 

INC 

DELAY+1 

0303 :A9 

00 


19 DELAY 

LDA 

#$00 


0305 :C9 

3C 


20 

CMP 

, #$3C 

o 

0307:90 

5E 

0367 

21 

BCC 

NOPRINT 

030 9 :A0 

00 


22 

LDY 

#$00 

030B:8C 

04 

03 

23 

STY 

DELAY+1 


030E:EE 

12 

03 

24 

INC 

SEC+1 

D 

0311 :A9 

00 


25 SEC 

LDA 

#$00 

0313 :C9 

3C 


26 

CMP 

#$3C 

0315:90 

1B 

0332 

27 

BCC 

OK 

0317:8C 

12 

03 

28 

STY 

SEC+1 


031A:EE 

1E 

03 

29 

INC 

MIN+1 


031D:A9 

00 


30 MIN 

LDA 

#$00 

031F:C9 

3C 


31 

CMP 

#$3C 

0321:90 

0F 

0332 

32 

BCC 

OK 


0323:8C 

1E 

03 

33 

STY 

MIN+1 

ò 

032 6 :EE 

2A 

03 

34 

INC 

ORE+1 

0329:A9 

00 


35 ORE 

LDA 

#$00 

032B.-C9 

18 


36 

CMP 

#$18 


032D: 90 

03 

0332 

37 

BCC 

OK 


032F:8C 

2A 

03 

38 

STY 

ORE+1 


/Tabulazione orizzontale. 
/Tabulazione verticale. 

/$7F=INVERSE : $FF=NORMAL 

/VTAB 

/PRINT 


/Incrementa i 60esimi. 
/Sono 60? 

/Se SI, li porta a 0. 
/Incrementa i secondi. 

/Sono 60? 

/Se SI, li porta a 0. 
/Incrementa i minuti. 

/Sono 60? 

/Se SI, li porta a 0. 
/Incrementa le ore. 

/Sono 24? 

/Se SI, le porta a 0. 


(Continua: Listato 4. Mr Mouse) 
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(Segue: Listato 4. Mr Mouse) 


LISTATI PER APPLE II 



0332:38 



3 9 OK 

SEC 


; Se al posto di SEC c'e' CLC 

3 

0333:90 

32 

0367 

40 

BCC 

NOPRINT 

/non viene stampata l'ora. 

0335 :A5 

24 


41 

LDA 

CH 

/Conserva la posizione orizzontale. 

0337:48 



42 

PHA 


0338 :A5 

25 


43 

LDA 

CV 

/quella verticale ed 


033A:48 



44 

PHA 



o 

033B:A5 

32 


45 

LDA 

MODE 

/il modo di stampa. 

033D:48 



46 

PHA 


033E:A9 

00 


47 

LDA 

#$00 

/Posizione orizzontale. 


0340:85 

24 


48 

STA 

CH 


3 

0342:A9 

00 


49 

LDA 

#$00 

/verticale e 

0344:20 

5B 

FB 

50 

JSR 

VTAB 


0347 :A9 

FF 


51 

LDA 

#$FF 

/modo di stampa dell'ora. 

0349:85 

32 


52 

STA 

MODE 



034B:AE 

2A 

03 

53 

LDX 

ORE+1 


3 

034 E : 20 

6D 

03 

54 

JSR 

ST 

/Stampa ore, 

0351 :AE 

1E 

03 

55 

LDX 

MIN+1 


0354:20 

68 

03 

56 

JSR 

STAMPA 

/minuti e 


0357 :AE 

12 

03 

57 

LDX 

SEC+1 


o 

035A:20 

68 

03 

58 

JSR 

STAMPA 

/secondi. 

035D:68 



59 

PLA 



035E:85 

32 


60 

STA 

MODE 

/Rimette a posto :Modo di stampa. 


0360:68 



61 

PLA 


3 

0361:20 

5B 

FB 

62 

JSR 

VTAB 

/posizione verticale ed 

0364:68 



63 

PLA 



0365:85 

24 


64 

STA 

CH 

/orizzontale. 

0367:60 



65 NOPRINT 

RTS 




0368: 



66 * 




B 

0368: 



67 * Subroutine 

di stampa 


0368: 



68 * 



0368 :A9 

BA 


69 STAMPA 

LDA 

#' : ' 



036A:20 

F0 

FD 

70 

JSR 

PRINT 

/Stampa il sepatatore (:). 

p: 

036D:F8 



71 ST 

SED 



036E: 18 



72 

CLC 



036F:A9 

00 


73 

LDA 

#$00 



0371:2C 



74 

DFB 

$2C 

/Salta la prossima istruzióne. 


0372:69 

01 


75 LOOP 

ADC 

#$01 

/Converte da esadecimale a decimale 

o 

0 3 7 4 :CA 



76 

DEX 



0375:10 

FB 

0372 

77 

BPL 

LOOP 


0377 :D8 



78 

CLD 




0378:48 



79 

PHA 



3 

037 9:4A 



80 

LSR 



037A:4A 



81 

LSR 



037B:4A 



82 

LSR 




037C:4A 



83 

LSR 


/Elimina il nibble basso. 

jj 

037D: 20 

83 

03 

84 

JSR 

NIBBLE 

/Stampa il nibble alto. 

0380:68 



85 

PLA 



0381:29 

0F 


86 

AND 

#%00001111 

/Seleziona il nibble basso. 


0383:09 

B0 


87 NIBBLE 

ORA 

#$B0 

/Forza al carattere 0. 


0385:4C 

F0 

FD 

88 

JMP 

PRINT 

/Stampa il nibble. 


(Fine) 


Checksum del listato 4 

NOME FILE: MOUSE.TIME 
TIPO: B 

LUNGHEZZA: 0088 
CHECKSUM : 60 



Il mensile con 
disco programmi per 

Apple II, 

Ile, Ile, Europlus. 

Prenotalo presso 
la tua edicola di fiducia. 
Costa solo 15.000 lire. 


y 

2 

o 

2 

3 

o 

d 

Q 

Ò 

3 

o 

o 

o 

o 

o 

p 

o 

3 

Q 

0 

o 

O 

n 


118 






















□ 


LISTATI PER MACINTOSH 




Listato 1. Painter 


Alcune righe del listato sono state spezzate per 
esigenze di impaginazione: quando incontrate il simbolo • 
continuate a battere SENZA PREMERE il tasto di return 


Painter 

by Mike Linkovich 
Copyright 1987 by Applicando 
& MicroSPARC, Ine. 

MS Basic versione 2.0 (b) o successive 
Sul Macintosh Plus sarebbe necessario 
usare la versione 2.1 o successive 


DEFINT A-Z 
Startup: 

RANDOMIZE TIMER 

WINDOW 1,"", (ll,30)-(499 / 332),4 
Patn=4:Px=10:Py=10:Tool=l:c=0:B=0:E=0 
x=0:y=0:R=6:Act=0:itemID=0:MenuID=0:G$="" 
theSize = 8:White = 0 

DIM Pat (19),Pici (6000),B(5), RPat(5) , Set (10) 
DIM CrsXOR(33),CrsPat(33),CrsDry(33) 

FOR c=l TO 5 :B(c)=2 : RPat(c)=c-l:NEXT 
TO 10 : READ Set (c) :NEXT 
TO 33 : READ CrsXOR(c) :NEXT 
TO 33:READ CrsPat (c) :NEXT 
TO 33 : READ CrsDry(c):NEXT 


FOR 

FOR 

FOR 

FOR 


c=l 
=0 
=0 
=0 

FOR c=0 TO 3 
Pat(c)=0 
Pat(c+4)=17425 
Pat(c+8)=21930 
Pat(c+12)=-17426 
Pat(c+16)=-l 

NEXT 

MENU 1,0,1,"Archivio" 

MENU 1,1,1,"Cancella Video" 

MENU 1,2,1,"Apri..." 

MENU 1,3,1,"Registra come..." 

MENU 1,4,1,"Stampa" 

MENU 1,5,1,"Salva negli Appunti" 

MENU 1,6,1,"Esci al BASIC" 

MENU 1,7,1,"Esci al Finder" 

MENU 2,0,1,"Opzioni" 

MENU 2,1,1,"Carboncino" 

MENU 2,2,1,"Retini" 

MENU 2,3,1,"Inversione" 

MENU 3,0,1,"Penna" 

MENU 3,1,1,"Bianco" 

MENU 3,2,1,"Grigio chiaro" 

MENU 3,3,1,"Grigio medio" 

MENU 3,4,1,"Grigio scuro" 

MENU 3,5,2,"Nero" 

MENU 3,6,0, 

MENU 3,7,1,"Piccola" 

MENU 3,8,2,"Media" 

MENU 3,9,1,"Larga" 

MENU 4,0,1,"Regolazioni" 

MENU 4,1,1,"Variabili carboncino..." 

MENU 4,2,1,"Retini..." 

MENU 4,3,1,"Dimensioni penna..." 

MENU 5,0,0,"" 

GOSUB TitleScreen 

ON MENU GOSUB MenuFix : MENU ON 
TEXTFONT 0 
GOSUB DryBrushl 

Paint : 

WHILE MOUSE(0)=0 

IF DIALOG(0)=5 THEN PUT (0,0),Pie!,PSET 
IF MOUSE(1) < 0 OR MOUSE(1) > 488 OR MOUSE 
(2) < 0 OR MOUSE(2) > 302 THEN CALL INITCURSOR:GOT 
O PaintSkip 

IF Tool = 1 THEN CALL SETCURSOR(VARPTR(Crs 

Dry (0))) 

IF Tool = 2 THEN CALL SETCURSOR(VARPTR(Crs 

Pat (0))) 

IF Tool = 3 THEN CALL SETCURSOR(VARPTR(Crs 

XOR(0) ) ) 

PaintSkip: 

WEND 

CALL MOVETO(MOUSE(1) , MOUSE(2) ) 

ON Tool GOSUB DryBrush,Pat.Paint,XORPaint 
CALL LINETO(MOUSE(1),MOUSE(2)) 


PaintLoop: 

ON Tool GOSUB DryBrush,Pat.Paint,XORPaint 
CALL LINETO(MOUSE(1),MOUSE(2)) 

IF MOUSE(0)>-l THEN GET(0,0)-(487,301),Pie 
!:GOTO Paint 

GOTO PaintLoop 

Pat.Paintl: 

CALL SETCURSOR(VARPTR(CrsPat (0))) 

Tool=2 : PENSIZE Px,Py 

MENU 2,1,1:MENU 2,2,2:MENU 2,3,1 

invert = 0 

RETURN 

Pat.Paint : 

CALL PENPAT(VARPTR (Pat (RPat(INT(RND(1)*R))*4) ) 
RETURN 

DryBrushl: 

CALL SETCURSOR(VARPTR(CrsDry(0) ) ) 

MENU 2,1,2:MENU 2,2,1:MENU 2,3,1 
invert = 0 
.RETÙRN 

DryBrush: 

x=INT (RND (1) * (Set (3) +1-Set (1) ) ) +Set (1) 

• y=INT(RND(1)*(Set (4)+1-Set(2)))+Set (2) 

CALL PENSIZE (x,y) 
invert = 0 
RETURN 

XORPaint1 : 

CALL SETCURSOR(VARPTR(CrsXOR(0))) 

MENU 2,1,1:MENU 2,2,1:MENU 2,3,2 

itemID = 5 :GOSUB PatPick 

CALL PENMODE(10) 

invert = 1 

RETURN 

XORPaint: 

CALL LINETO(MOUSE(1),MOUSE(2)) 

RETURN 

' Aggiungete qui altre routine 
' per il pennello. 

TitleScreen: 

WINDOW 2,"", (121,130)-(379,232),2 
MOVETO 8,20 
TEXTFONT 0 / 

PRINT"Painter" 

TEXTFONT 1:TEXTSIZE 9 

MOVETO 8,40:PRINT "by Mike Linkovich" 

MOVETO 8,52:PRINT "© 1987 by Applicando & Micr 
oSPARC Ine 11 

MOVETO 70,92:PRINT"Clic qui per continuare"; 
WHILE MOUSE(0) = 0:WEND 
WINDOW CLOSE 2 
WHILE DIALOG(0) <> 0:WEND 
RETURN 


MenuFix: 

MenuID=MENU(0) 
itemID=MENU(1) 

MENU OFF 

GET(0,0)-(487,301),Pic! 

ON MenuID GOSUB File,Options,PenEdit,Sets 
IF invert THEN MENU 3,1,0 ELSE GOSUB FixWhite 
MENU : MENU ON 
RETURN 

FixWhite: 

IF White THEN MENU 3,1,2 ELSE MENU 3,1,1 
RETURN 

File: 

ON itemID GOSUB ClrScr,Opn,Sve,Prt,SvClip, Quit 
BAS,Quit 

RETURN 

Options: 

PENMODE 8 :PENSIZE Px,Py:Tool=itemID 
CALL PENPAT(VARPTR (Pat (Patn*4))) 

ON itemID GOSUB DryBrushl,Pat.Paintl,XORPaintl 
RETURN 

Sets : 

ON itemID GOSUB Dryvar,Pats,Sizes 


(Continua: Listato 1. Painter) 
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(Segue: Listato 1. Pointer) 


RETURN 
PenEdit: 

IF itemID<6 THEN GOSUB PatPick 

IF itemID>6 AND itemID<10 THEN GOSUB SizePick 

RETURN 

PstiPiolc " 

FOr’c= 1 TO 5:MENU 3,c,1:NEXT:MENU 3, itemID,2 :P 
atn=itemID-l 

CALL PENPAT (VARPTR (Pat (Patn*4) ) ) 

IF itemID = 1 THEN White = 1 ELSE White = 0 
RETURN 

SizePick r 

FOR c=7 TO 9:MENU 3,c,1 :NEXT:MENU 3,itemID,2 
Px=Set ( (itemID-6)*2+3) :Py=Set((itemID-6)*2 + 4) 
PENSIZE Px,Py 
theSize = itemID 
RETURN 

ClrScr: 

GOSUB Verify 

IF Act=3 OR (Act=1 AND F$="") THEN CISkip 
CALL BACKPAT(VARPTR(Pat(Patn*4) )) :CLS 
GET(0,0)-(487,301),Pic! 

CISkip: 

RETURN 


Opn: 


GOSUB Verify 

IF Act =3 OR (Act=l AND F$="") THEN OpSkip 
F$=FILES$(1,"PNTR") 

IF F$="" THEN OpSkip 
OPEN F$ FOR INPUT AS #1 
INPUT #l,c 
G$=INPUT$(c,1) 

CLOSE #1 
PICTURE ,G$ 

GET (0, 0)-(487,301),Pic! 

OpSkip: 

RETURN 


Sve: 


F$=FILES$(0,"Salva il disegno come...") 

IF F$ = "" THEN SvSkip 
PICTURE ON 

PUT (0,0),Pie!,PSET 
PICTURE OFF 
G$=PICTURE$ 

OPEN F$ FOR OUTPUT AS #1 
PRINT #1,LEN(G$) 

PRINT #1, G$ 

CLOSE #1 

NAME F$ AS F$,"PNTR" 

PUT (0,0),Pie!,PSET 
SvSkip: 

RETURN 

Prt : 

PICTURE ON 

PUT (0,0),Pie!,PSET 
PICTURE OFF 
G$=PICTURES 

OPEN"LPTl:" FOR OUTPUT AS #1 
WINDOW OUTPUT #1 
PICTURE (70,175),G$ 

CLOSE #1 
WINDOW OUTPUT 1 
RETURN 

SvClip: 

PICTURE ON 

PU.T (0,0) , Pie! , PSET 
PICTURE OFF 

OPEN"CLIP:PICTURE" FOR OUTPUT AS 1 
PRINT #1,PICTURE? 

CLOSE #1 
RETURN 

QuitBAS: 

GOSUB Verify 

IF Act=3 OR (Act=1 AND F$="") THEN QtBSkip 

WINDOW CLOSE 1 

MENU OFF 

MENU RESET 

END 

QtBSkip: 


RETURN 
Quit : 

GOSUB Verify 

IF Act=3 OR (Act=1 AND F$="") THEN QtSkip 

WINDOW CLOSE 1 

MENU OFF 

MENU RESET 

SYSTEM 

QtSkip: 

RETURN 

Dryvar: 

WINDOW 2,"", (105,105)-(400,225) ,-2 
TEXTFONT 0 

MOVETO 20, 25 :TEXTFACE 4 
PRINT"Variabili carboncino..." 

TEXTFACE 0:MOVETO 165,25:PRINT"Largh. Altezza 
MOVETO 50, 52 :PRINT"Minimo" 

MOVETO 50, 72 :PRINT"Massimo" 

FOR c=l TO 2 

EDIT FIELD c*2-1,STR$(Set(c*2-1)), (172,c*2 
0+20)- (200,c*20+35), 1,3 

EDIT FIELD c*2,STR$(Set(c*2)), (221,c*20 + 20 
)-(249,c*20+35),1,3 
NEXT 

BUTTON 6,1,"Ok", (210,90)-(280, 112) 

E=1 : EDIT FIELD E 
DvLoop: 

Z = 0 : WHILE ZOI AND Z<>6 AND Z<>7 : Z=D 
IALOG(O) : WEND 

IF Z=1 OR Z=6 THEN DvSkip 
E=E+1 : IF E>4 THEN E=1 
EDIT FIELD E : GOTO DvLoop 
DvSkip: 

Act$ = "" 

FOR c=l TO 4 

IF LEN (EDITS (c) )> 3 THEN Act$="La dim 

ensione è troppo grande.": ELSE Set(c)=VAL(EDIT$(c) 
NEXT 

THEN GOSUB ErrMsg: GOTO DvLoop 
Set (3) OR Set (2) > Set (4) THEN 
inferiore al minimo." 

0 OR Set (2) < 0 OR Set (3) < 0 


> 500 OR Set (2) > 500 OR Set (3) 
500 THEN Act$="La dimensione è t 


IF Act $ <> 

IF Set (1) > 

Act$="Il massimo è 
IF Set (1) < 

OR Set (4) < 0 THEN Act$="I valori devono essere po 
sitivi." 

IF Set (1) 

> 500 OR Set (4) > 
roppo grande." 

IF Act$="" THEN DvSkip2 
GOSUB ErrMsg : GOTO DvLoop 
DvSkip2: 

WINDOW CLOSE 2 
RETURN 

Pats : 

WINDOW 2,"", (105,105)-(400,225),-2 

TEXTFONT 0:TEXTFACE 4 

MOVETO 17,22 :PRINT"Densità retini" 

BUTTON 6,1,"Ok", (210,90)- (280, 112) 

R(0)=45 :R(1)=80 :R(2)=61:R(3) =130 
BUTTON 1,B(1),(60,45)-(130, 60),2 
CALL FRAMERECT(VARPTR(R(0))) 

BUTTON 2,B (2),"", ( 60,65)-( 130, 80),2 
R(0) =65 :R(2)=81 

CALL FILLRECT(VARPTR(R(0)),VARPTR(Pat(4))> 
FRAMERECT(VARPTR(R(0))) 

BUTTON 3,B (3),"", (170,25)- (240,40),2 
R(0)=25:R(1)=190:R(2)=41:R (3)=240 
CALL FILLRECT(VARPTR(R(0)),VARPTR(Pat(8))) 
FRAMERECT(VARPTR(R(0))) 

BUTTON 4,B (4),(170, 45)-(240,60),2 
R (0) =45 : R (2) =61 

CALL FILLRECT(VARPTR(R(0)),VARPTR(Pat(12))) 
FRAMERECT(VARPTR(R(0)}) 

BUTTON 5,B (5),(170, 65)-(240,80),2 
R(0) =65 :R(2)=81 

CALL FILLRECT(VARPTR(R(0)),VARPTR(Pat (16))) 
FRAMERECT(VARPTR(R(0))) 

PtsLoop: 

Z = 0 : WHILE zol AND Z<>6 : Z=DIALOG(0) 

: WEND 

IF Z = 6 THEN PtsSkip 
Z = DIALOG(1) 

IF Z = 6 THEN PtsSkip 

IF B (Z) =2 THEN B(Z) =1 ELSE B(Z) = 2 
BUTTON Z,B (Z}: GOTO PtsLoop 
PtsSkip: 

IF B(l)+B(2)+B(3)+B(4)+B(5) > 5 THEN PtsSk 


(Continua: Listato 1. Pointer) 
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(Segue: Listato 1. Pointer) 

ip2 

Act$="Deve essere selezionato almeno un re 

tino." 

GOSUB ErrMsg 
GOTO PtsLoop 
PtsSkip2: 

R=0:FOR c=l TO 5 

IF B(c)=2 THEN RPat(R)=c-l:R=R+1 

NEXT 

WINDOW CLOSE 2 
RETURN 

Sizes : 

WINDOW 2," ", (105, 10 5)- (400, 225),-2 
TEXTFONT 0 

MOVETO 18, 19 :TEXTFACE 4 
PRINT"Dimensioni penna" : TEXTFACE 0 
BUTTON 6,1,"Ok", (210, 90)-(280,112) 

MOVETO 90,37:PRINT"Piccola":MOVETO 90,57:PRINT 
"Media" 

MOVETO 90,77 :PRINT"Larga"; 

MOVETO 148,19 :PRINT"Largh. Altezza" 

FOR c=3 TO 5 

EDIT FIELD c*2-l,STR$(Set(c*2-l)), (160,c*2 
0-35)-(188,c*20-20),1,3 

EDIT FIELD c*2,STR$(Set(c*2)),(202,c*20-35 
)-(230,c*20-20),1,3 
NEXT 

EDIT FIELD 5 : E=5 
SzLoop: 

Z = 0 : WHILE Z<>1 AND Z<>6 AND Z<>7 : Z=D 
IALOG(O) : WEND 

IF Z=1 OR Z = 6 THEN SzSkip 
E=E+1 : IF E>10 THEN E=5 
EDIT FIELD E : GOTO SzLoop 
SzSkip: 

Act $="" 

FOR c=5 TO 10 

IF LEN (EDIT$(c) )> 3 THEN Act$="La di 
mensione è troppo grande.": ELSE Set (c)=VAL(EDIT$( 
c>) 

NEXT 

IF Act$ <> "" THEN GOSUB ErrMsg:GOTO SzLoop 
IF Set (5) < 0 OR Set (6) < 0 OR Set (7) < 0 
OR Set (8) < 0 OR Set (9) < 0 OR Set (10) < 0 THEN Ac 
t$="I valori devono essere positivi." 

IF Set (5) > 500 OR Set (6) > 500 OR Set (7) 

> 500 OR Set (8) > 500 OR Set (9) > 500 OR Set (10) > 
500 THEN Act$="La dimensione è troppo grande." 

IF Act$="" THEN SzSkip2 
GOSUB ErrMsg : GOTO SzLoop 


SzSkip2: 

WINDOW CLOSE 2 
itemID = theSize 
GOSUB SizePick 
RETURN 

Verify: 

WINDOW 2,"", (130, 75)-(370,150),-2 
TEXTFONT 0:MOVETO 17,30 
PRINT "Salvo il disegno?"; 

BUTTON 1,1,"Si", (17,40)-(77,60) 

BUTTON 2,1,"No", (84,40)-( 144, 60) 

BUTTON 3,1,"Annulla", (151,40)-(211, 60) 

WHILE DIALOG(0)<>1:WEND 
Act=DIALOG(1) 

IF Act=l THEN GOSUB Sve 
WINDOW CLOSE 2 
RETURN 

ErrMsg: 

WINDOW 3,"", (90,40)-(410, 106) ,-2 

BEEP : TEXTFONT 0 : MOVETO 17,20 : PRINT Act$; 

BUTTON 3,1,"Ok", (210, 33)-(290,54) 

WHILE DIALOG(0)<>1:WEND 

WINDOW CLOSE 3 

RETURN 

'Valori di default del pennello 
DATA 1,1,10,10,5,5,10,10,15,15 

'Dati per Invert cursor 

DATA 960,800,1824,1856,2880,2944,4992,4864,13056,1 
2800,30208,29696 

DATA 30720,28672,24576,16384,960,992,2016,1984,403 

2,3968,8064,7936 

DATA 16128,15872,32256,31744,30720,0,0,0,15,1 
'Dati per i Retini 

DATA 960,992,1504,1728,3392,2688,5504,4864,10496,8 
704,22016,17408 

DATA 18432,28672,24576,16384,960,992,2016,1984,403 

2,3968,8064,7936 

DATA 16128,15872,32256,31744,30720,0,0,0,15,1 
'Dati per-il Carboncino 

DATA 960, 992,2016,185 6, 2624,2 688, 473 6,588 8, 1203 2,8 
704,32256,21504 

DATA 18 43 2, 28 67 2, 24 57 6, 1638 4, 960, 992, 2016, 1984, 403 

2,3968,8064,7936 

DATA 16128,15872,32256,31744,30720,0,0,0,15,1 




(Fine) 



Il mensile con 
disco programmi 
per personal computer 
ibm, Olivetti 
e compatibili. 
Prenotalo presso 
la tua edicola di fiducia. 
Costa solo 15.000 lire. 
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Listati senza fatica 


Tutti i programmi di Applicando possono essere trascritti e quindi salvati su dischetto. Ma la trascrizione è 
lenta e noiosa, e sbagliare fin troppo facile. Ecco perché Applicando offre, già pronti, i dischetti con i pro¬ 
grammi autoguidati (cioè con le istruzioni), sia per Apple II, sia per Macintosh: per ottenerli, è sufficiente in¬ 
viarci il tagliando di pag. 130 debitamente compilato. Per risparmiare, non perdete la favolosa offerta del¬ 
l'abbonamento al Disk Service e inviate subito il tagliando di pag. 129. 


Programmi 
per Apple II 

APPLICANDO 1 

AP1/I02 Profitti. In tempo reale l'analisi del 
break-even point, punto di pareggio di un’azienda. 
Calendario perpetuo. Dal 1582 in poi tutto quello 
che si può sapere sui giorni passati e futuri. I tron¬ 
chi del tesoro. Una spericolata caccia al tesoro a 
nuoto, tra le insidie di tronchi galleggianti. Lire 
30.000. 

AP1/N03 Eliminatore di Dos. Uno strumento per 
aumentare del 10% la capacità di un normale flop¬ 
py disk. Orologio. Per trasformare l'Apple II in un o- 
rologio con rintocchi, allarme e lancetta dei secon¬ 
di. Pronti puntare fuoco! Guardiano di un castello a- 
bbandonato, hai 25 colpi da sparare contro gli in¬ 
trusi. Lire 30.000. 

APPLICANDO 2 

AP2/IN04 Costi chilometrici auto. Un programma 
per calcolare e confrontare i costi di qualunque au¬ 
to. Richiamafigure. Posizionare, ingrandire, ruota¬ 
re, cambiare colore, aggiungere figure a quelle di u- 
na tavola. Laser nello spazio. Battaglia a colpi di la¬ 
ser contro asteroidi e alieni per difendere la tor¬ 
retta spaziale. Lire 30.000. 

APPLICANDO 3 

AP3/IN05 Sistema base. Un data base modulare 
con tutte le caratteristiche essenziali per mettere 
ordine nei propri archivi. Etichette. Etichette spiri¬ 
tose e bizzarre, di lavoro o di ogni genere, stampa¬ 
te facilmente e nel numero desiderato. Contratti. 
Con il WPL, il linguaggio di programmazione del¬ 
l'Apple Writer, bastano cinque minuti per un docu¬ 
mento di più pagine personalizzato. Gran catalogo. 
Una routine per avere il catalogo del dischetto su 
due colonne, 42 file per volta, e richiamarli con un 
solo tasto. Lire 30.000. 

AP3/A06 Equo canone (occorre Visicalc). In Visi- 
cale un modello che permette, a inquilini e proprie¬ 
tari, l'esatto calcolo dell'equo canone. Lire 25.000. 

APPLICANDO 4 

AP4/N07 Lettura sprint (versione italiana e ver¬ 
sione con frasi in inglese). Un reading improver 
per leggere di più a parità di tempo. Rompiauindi- 
ci. Il piccolo rompicapo delle quindici pedine da ordi¬ 
nare nei sedici spazi a disposizione, tastierino fan¬ 
tasma. Una routine per avere a disposizione un ta¬ 
stierino numerico anche sull'Apple II. Routine di In¬ 
put. Due subroutine, una per i dati numerici, l'altra 
per gli alfanumerici, per il controllo dell'input. Lire 
30.000. 

AP4/A09 Organo, violino, pianoforte (dischetto 
Pascal, occorre language cara o Apple Ile o Ile). Ec¬ 
co come, col Pascal, si riesce a simulare i tre stru¬ 
menti attivando l'altoparlante dell'Apple da pro¬ 
gramma. Lire 30.000 


APPLICANDO 5 

AP5/N08 Investor. In tempo reale il quadro esatto 
di come vanno i propri investimenti finanziari. Con 
cinque prospetti riepilogativi e 52 periodi di quo¬ 
tazione, Investor è uno dei programmi più completi 
in questo settore e in assoluto il più economico. Li¬ 
re 70.000. 

AP5/N09 Agenda personale. Per ricordare ora 
per ora gli appuntamenti di un anno intero memoriz¬ 
zando fino a 15 appunti ogni giorno. Duello d'arti¬ 
glieria. Vince chi sa calcolare meglio la velocità del 
vento, la gittate e l'elevazione della canna. Mele e 
freccette. Versione computerizzata del popolare 
gioco delle freccette che nulla toglie al gusto del 
far centro. Lire 30.000. 

APPLICANDO 6 

AP6/N10 Obbligazioni/Bond Manager. Per avere 
un quadro completo e concreto dei rendimenti dei 
titoli a reddito fisso. PucMan/Nibbler. Versione in 
alta risoluzione per Apple del famoso videogame a 
gettone. Line finder. Letteralmente trova righe; 
questa utility permette di localizzare facilmente i 
segmenti di un programma Lire 30.000. 

AP6/N11 Stress. In Pascal (occorre language 
card o Apple Ile o Ile). Per giocare, ma soprattut¬ 
to per inventare giochi, il programma si pone in al¬ 
ternativa agli usuali videogame. Lire 55.000. 

APPLICANDO 7 

AP7/N12 Apple pittore. Si possono realizzare sul¬ 
lo schermo capolavori di pittura, ottenendo effetti 
speciali di grande efficacia. Ottovolante. Un tuto- 
rial per insegnare ai bambini a riconoscere i numeri 
che rimbalzano sullo schermo. Diskblock. Una routi¬ 
ne che permette di evitare che qualche curioso pos¬ 
sa avere libero accesso in programmi riservati. Ar¬ 
chivio per Apple. Per avere un back-up dei pro¬ 
grammi più importanti da dischetto a cassetta o vi¬ 
ceversa. Discoteca. Una banca dati che tiene sotto 
controllo la collezione di LPe cassette. Aiuto. Alla 
fine della battitura di un programma, Aiuto vi dirà 
quanti errori ci sono e a quali linee. Lire 30.000. 

APPLICANDO 8 

AP8/N13 Cambiacomandi/Messaggi. Un program¬ 
ma che insegna come personalizzare i messaggi pro¬ 
pri del Dos dell'Apple. Le Mans. Un gran premio di 
formula uno da giocare in due o da soli contro il com¬ 
puter. Appleorgano. Ecco come trasformare Ap¬ 
ple//in un melodioso organo. Lire 30.000. 

AP8/T14 Momento di una forza/Colpo all'asta. La 

dimostrazione didattica del ribaltamento di un cor¬ 
po solido appoggiato a un piano quando viene appli¬ 
cata una forza orizzontale che supera il momento in 
senso opposto dovuto al peso. Hard copy pagine in 
alta risoluzione. Se la stampante è compatibile con 
questo programma si possono far miracoli. Lire 
30.000. 

APPLICANDO 9 

AP9/N15 Fuoco fatuo. Un appassionante adventu- 
re game con un percorso intricatissimo, mille tra¬ 


bocchetti, un troll e una principessa Apple artista. 
Per destreggiarsi nella grafica ad alta risoluzione 
usando lo schermo come tavolozza e la tastiera co¬ 
me pennello. Data hello. Una semplice routine che 
permette di disporre di una clock card inizializzan- 
do i dischetti con giorno, mese e anno. Lire 25.000. 

AP9/T16 Sistema di forze parallele. Fissandone 
l'intensità e la posizione, questo programma per¬ 
mette di visualizzare il centro di un sistema di for¬ 
ze sotto forma numerica e grafica. Traslazione e 
rotazione di una figura piana. Come far ruotare, 
traslare, rimpicciolire, ingrandire sul video una fi¬ 
gura piana. Lire 30.000. 

APPLICANDO IO 

API 0/N14 Ripristino. Come ripristinare program¬ 
mi persi per un'accidentale istruzione di New o di 
Fp. Disk Map. Un detective del Dos per scoprire 
dove e come vengono immagazzinati i dati analizzan¬ 
do la mappa dei bit occupati. Autonumber. Una rou¬ 
tine per autonumerare automaticamente i program¬ 
mi. Lire 30.000. 

Dieta AP16/N34 

Un pratico sistema di 
data base nutrizionale con 
il quale avrete la possibilità 
di personalizzare 
una dieta bilanciata 
V___ J 

API 0/T17 Rette nel piano cartesiano. Come indivi¬ 
duare in cinque modi diversi una coppia di rette in 
un piano cartesiano e avere visualizzate le equazioni 
relative ai piani assegnati. Statistica. Come analiz¬ 
zare la correlazione tra due fenomeni mediante l'in¬ 
dice di Bravais. Lire 30.000. 

APPLICANDO 11 

AP11/NI 8 Apple edicola. Una banca dati per ave¬ 
re sotto controllo un articolo, il suo numero di pagi¬ 
na, la rivista su cui è stato pubblicato. Disk Zap. Il 
programma indispensabile per il debugging. Mes¬ 
saggi personali. Quando la persona non c'è basta la¬ 
sciarle un messaggio in Apple//. Comparatore di 
programmi. Per risolvere dubbi sulle diverse ver¬ 
sioni dello stesso programma in basic. Trappola 
per pochi. Un cacciatore contro tre animali feroci. 
Vince chi riesce a intrappolare senza essere intrap¬ 
polato. Lire 30.000. 

AP11/T19 Espressioni. Come risolvere un piccolo 
dramma familiare con l'aiuto di un elaboratore per¬ 
sonale. Lire 25.000. 

APPLICANDO 12-13 

API 2/N20 Bridge. Un programma in altissima riso¬ 
luzione grafica che permette di imparare il bridge 
o di giocarlo contro il computer. Microcalc. Un fo¬ 
glio elettronico di calcolo che mette a disposizione 
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20 righe per 20 colonne, per un totale di 400 casel¬ 
le da riempire come si vuole. Applesoft Line Edi¬ 
tor. Una potente utility che permette l’editing dei 
programmi in Applesoft e aggiunge all’Apple un 
più ampio controllo del cursore. Lire 30.000. 

API 2/A21 Budget (occorre Appleworks). Un pro¬ 
spetto che con l'inserimento di dati mensili e di me¬ 
die preventive calcola automaticamente le medie 
consultive e i relativi saldi mensili e annui. Lire 
20 . 000 . 

AP12/A22 Budget (occorre Visicalc). Un prospet¬ 
to che con l’inserimento di dati mensili e di medie 
preventive calcola automaticamente le medie con¬ 
suntive e i relativi saldi mensili e annui. Lire 
20 . 000 . 

API 2/T25 Animazione di una rotazione tridimen¬ 
sionale. Un esempio di come una rotazione tridimen¬ 
sionale permette di rappresentare gli oggetti pro¬ 
prio come li vediamo. Trasformazione da File a Da¬ 
ta. Una utility per risolvere il problema di aggiunge¬ 
re a un programma preesistente delle istruzioni 
DATA ricavate da un altro file. Lire 25.000. 

APPLICANDO 14 

AP14/N26 Golf. Un programma in altissima risolu¬ 
zione grafica che permette di disegnare il proprio 
percorso di golf per poi giocarci a piacimento. Au¬ 
topiù. Per non dimenticare più gli appuntamenti fis¬ 
si dedicati alla manutenzione della vostra automobi¬ 
le. Lire 20.000. 

AP14/N27 Applebaby. Tre giochi didattici: impa¬ 
rare a contare in età prescolastica, ripassare le ta- 
belline, esercitarsi nell'ortografia Lire 25.000. 

AP14/A28 Rimborso spese (occorre Applewor¬ 
ks). Un prospetto che permette di preparare le vo¬ 
stre note spese automaticamente. Lire 20.000. 

AP14/A29 Rimborso spese (occorre Visicalc). Un 
prospetto che permette di preparare le vostre no¬ 
te spese automaticamente. Lire 20.000. 

AP14/T30 Frutteti. Un aiuto a risolvere uno dei 
più classici problemi di estimo. Instant Poster. 
Scrivete la frase che volete, e subito dalla stam¬ 
pante esce un poster gigante. Lire 20.000. 

APPLICANDO 15 

AP15/N31 Sintetizzatore di suoni. Dotate i vostri 
lavori di una colonna sonora eccezionale: dal canto 
dell'uccellino alla mitragliatrice, dal treno in corsa 
all'aereo. Volano. Un gioco in alta risoluzione per 
due sfidanti. Illustratore. Un programma di grafi¬ 
ca che offre la possibilità di realizzare ottimi dise¬ 
gni anche a chi non è molto dotato. Autoschermo. 
Crea in automatico menù altamente professionali 
(come quelli di Appleworks) da inserire nei vostri 
programmi. Lire 30.000. 

AP15/A32 Computer cuisine. Un ricettario compu¬ 
terizzato sul quale memorizzare ingredienti e ricet¬ 
te a centinaia. Con possibilità di stampa delle singo¬ 
le ricette e con un menù completo dei migliori piatti 
creati da Gualtiero Marchesi, il più famoso cuoco 
d'Italia. Occorre scheda 80 colonne. Lire 20.000. 

AP15/T33 Euclide. Il massimo comune divisore e il 
minimo comune multiplo in un programma che ne per¬ 
mette l'immediata comprensione. Isomeri. Fa parte 
del più ampio progetto americano Seraphim, per lo 
studio della chimica. Lire 20.000. 

APPLICANDO 16 

API 6/N34 Dieta personalizzata. Un pratico siste¬ 
ma di data base nutrizionale, con il quale è possibile 
personalizzare, a seconda della propria costituzio¬ 
ne fisica e delle abitudini alimentari, una dieta bilan¬ 


ciata, a lungo o a breve termine. Il dischetto contie¬ 
ne un file dati di 400 cibi, la cui composizione è ana¬ 
lizzata in calorie, proteine, grassi, vitamine e cole¬ 
sterolo. Lire 30.000. 

API6/N35 Designer. Il concetto dei potenti e co¬ 
stosi programmi di CAD/CAM alla portata dell'Ap¬ 
ple//, per fare del computer uno strumento semi¬ 
professionale per disegnare. Il gioco dei pompieri. 
E' scoppiato un incendio, e voi siete un pompiere 
che deve salvare il maggior numero di persone pri¬ 
ma che muoiano soffocate tra le fiamme. Per lista¬ 
re bene in vista. Se nel programmare avete preferi¬ 
to la compattezza alla chiarezza, avete bisogno di 
questo programma. Timer. Un fedele e preciso con¬ 
tasecondi che avverte del passare del tempo, e al 
momento giusto... Lire 30.000. 

AP16/N36 Cento One-liner. Utilities, routines, di¬ 
mostrativi di grafica e di suoni, e perfino giochi. 
Cento programmi su un solo dischetto, tutti rigoro¬ 
samente scritti in una sola linea di Basic. Da usare 
così come sono, da studiare come esempi di sintesi, 
o da trasferire nei vostri programmi. Lire 30.000. 

API 6/N37 Rubrica telefonica (occorre Applewor¬ 
ks). Un'agenda telefonica che individua in tempo 
reale qualunque numero memorizzato, che stampa 
le etichette per spedire gli auguri, e stampa elen¬ 
chi su carta da distribuire aggiornati ogni mese ai 
collaboratori. Lire 15.000. 

APPLICANDO 17 

API 7/N38 Strade d'America. Pianifica un qualun¬ 
que itinerario stradale americano tra ben 171 città 
diverse, fornendo le sigle delle strade da percorre¬ 
re, l’elenco delle città intermedie e i calcoli della di¬ 
stanza in miglia dei tratti intermedi e totali. Uraga¬ 
no. Su una piccola città indifesa una tempestasi ab¬ 
batte implacabile: distruggerà tutto. A meno che... 
Gioco ad altissima risoluzione grafica. Lire 30.000. 

AP17/N39 Regress. Ideale per manipolare dati 
con funzioni statistiche, con la possibilità di chiede¬ 
re previsioni in base all'andamento della regressio¬ 
ne sui dati inseriti. Calcolatrice RPN. Con questo 
programma l'Apple diventa una sofisticata calcola¬ 
trice che impiega per l’input la notazione polacca in¬ 
versa, con una catasta operativa di quattro regi¬ 
stri. Sparate a vista. Siete appostati contro un 
muro e comandate un potente cannone. Dal cielo 
fluttuano oggetti che dovete colpire. Ma un avver¬ 
sario con un altro cannone... Ure 30.000. 

AP17/A40 I conti del negozio (occorre Applewor¬ 
ks). Questo modello di spreadsheet è utilissimo 
per seguire l'andamento giornaliero e mensile di un 
negozio. Per ogni movimento di cassa è possibile 
memorizzare causale e tipo di pagamento. Il compu¬ 
ter calcola i totali per ogni voce e indica qual è sta¬ 
to il movimento di cassa della giornata, tenendo con¬ 
to degli ordini e dei saldi per impegni precedenti, e- 
labora i dati suddivisi per categoria merceologiche 
e calcola le percentuali di ripartizione degli utili su 
ogni articolo. Lire 50.000. 


gioco Trivial Pursuit, però personalizzabile e quin¬ 
di utile anche per studiare o ripassare. Bioritmi. 
Con questo programma si può seguire l'andamento 
dei propri bioritmi: tutti e tre i cicli, mese per me¬ 
se. Òcchio ai consumi. Invece di annotare diligente¬ 
mente la percorrenza in chilometri e i litri di carbu¬ 
rante consumato e poi fare i relativi calcoli... Lire 
30.000. 


AP18/N42 Regolatore del bip. Un programma per 
regolare a piacimento il volume del beep dell'Apple 
Ile. Comparatore di grafici. Ecco come comparare 
le curve disegnate da funzioni diverse. Impaginato- 
re di messaggi. Scritte perfettamente centrate 
sia sul video che sulla stampante, senza fatica. Utili¬ 
ty per ProDOS. Prefix, Subdirectory, Pathname? 
Sono termini che bisogna conoscere per program¬ 
mare in ProDOS. Questa utility aiuterà a capire e 
imparare con facilità Lire 30.000. 


APPLICANDO 19 

API 9/N43 Oracolo. Comperare una casa? Cambia¬ 
re lavoro? Concludere o no quell’affare? Il primo 
programma di tipo decision maker disponibile tn Ita¬ 
lia. Digger. A differenza dei giochi di labirinto di ti¬ 
po tradizionale, Digger chiede di risolvere dei rom¬ 
picapo spaziali, e la prontezza di riflessi non è tra i 
fattori del gioco... Claustrofobia. Questo gioco in 
alta risoluzione, pacifista nei risultati, ma non nei 
metodi, mette alla prova l'abilità del giocatore. Ma 
attenzione che non vi incastrino, perché soffrite di 
claustrofobia... Gestione puntatori. Volete carica¬ 
re in memoria un programma in Applesoft al di so¬ 
pra di questo o quel codice in linguaggio macchina? 
Magari aggirando la memoria di schermo in alta ri¬ 


soluzione? O addirittura in cima a un codice ormai 
servito al suo scopo in un programma che sta giran¬ 
do? O annullare un FP battuto per errore? Con 
questo programma, tutto è possibile. Grafica in 
aoppia risoluzione. Tre routine in Basic e una in As¬ 
sembler che vi pernotteranno di creare prorammi in 
doppia alta risoluzione con 16 colori. Sei soluzioni. Il 
programma, proposto nell'ambito del Progetto Se¬ 
raphim, è un test che consiste nel presentare allo 
studente quantità limitate di un certo numero di so¬ 
luzioni in provette numerate. Lo studente conosce 
le sostanze presenti e deve identificare il contenu¬ 
to di ciascuna provetta. Lire 30.000. 


APPLICANDO 20 

AP20/N44 Salute. Vaccinazioni, malattie, analisi, 
terapie e soprattutto costi a non finire. Come ri¬ 
cordare tutto, registrare e listare le spese medi¬ 
che di tutti i familiari? E al momento ai pagare le 
tasse... Variabili. Con questa utility in Applesoft 
potrete visualizzare i valori delle variabili per un'ef¬ 
ficace individuazione degli errori di un programma. 
Grafica. Che cosa sono le figure a blocco? Perché è 
importante farne la conoscenza? Per chi possiede 
l'Apple //c o il Ile con scheda 80 colonne continua 
l'entusiasmante viaggio nel mondo dell’altissima ri¬ 
soluzione. Simulazione di un equilibrio. Un software 
didattico del progetto Seraphim che crea la simula¬ 
zione al computer di un problema di equilibrio. Lire 
30.000. 


API 7/A41 I conti del negozio (occorre Visi Cale). 
Come API 7/A40, ma con VisiCalc. Lire 50.000. 

APPLICANDO 18 

API 8/N41 Trivia. Una versione per Apple II, del 


AP20/N45 Oroscopo. Scientificamente fondato, 
permette,la creazione di una carta del cielo natale 
che nulla invidia ai grafici tracciati dai professioni¬ 
sti. E le tabelle con latitudini, longitudini, fusi orari 
eccetera? Ci sono, ci sono... Voce. Ora non gli man- 
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Investor AP5/N08 

In tempo reale il quadro esatto degli investimenti finanziari 
con 5 prospetti e 52 periodi di quotazione. Un programma 
competitivo, con analisi grafica potenziata. Lire 70.000 
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FreeSoftware per Apple II 

I seguenti dischetti sono disponibili a lire 25.000 se li si ordina uno per volta, a lire 75.000 se se ne ordina¬ 
no cinque (praticamente 15.000 lire l'uno), a lire 90.000 se se ne ordinano dieci (quindi 9.000 lire l'uno) e a 
lire 160.000 se li si ordina tutti (e cioè 8.000 lire l'uno). Questi prezzi si intendono comprensivi di Iva e spe- 
dizbne. Utilizzare il tagliando del Disk Service, specificando il codice. 

APQ1/FSII. 30 proposte di Hello per lo startup dei dischetti e 10 soluzioni per i menù dei programmi. In 
Basic, Integer e linguaggio macchina a scelta tra startup grafici, di utilità e personalizzati. 

AP02/FSII. Oltre 40 programmi di matematica e statistica: convertitore di misure, equazioni, metodo di 
Fourier, seno e coseno, inversioni di matrice, n fattoriale, esercizi e dimostrazioni varie di statistica e plot- 
taggio. 

AP03/FSII. The Data Base. E’ il database d'immediato utilizzo per le più semplici esigenze. 

AP04/FSII. Bank'n, un programma che trasforma l'Apple II in un fedele banchiere che tiene conto di tutte 
le operazioni effettuate sul vostro conto corrente. 

AP05/FSII. 20 programmi grafici: alfabeto, animazione e suono, immagini digitalizzate, vacanze, pagine 
grafiche 1 e 2, subroutine Hi-res, poster di Snoopy. 

AP06/FSII. Oltre 40 fra dimostrativi e utility grafiche: 10 funzioni geometriche, checker-board per il co¬ 
lore, Hi-res dump su Epson, 3-D, Inveri Hi-Res page, shape table Assembler, Spirograph, animazione in al¬ 
ta risoluzione. 

AP07/FSII. Oltre 20 programmi e utility musicali: Apple Music Maker, Apple Organ, Happy Birthday, Sxo- 
tic sounds, Siren, Song writer, utility per riconoscere i numeri dei toni e la durata degli stessi oltre a nume¬ 
rosi dimostrativi con musiche famose. 

AP08/FSII. Comunicazioni, un menù di 10 voci per comunicare meglio con l'Apple II: Pickup, Autodial, Basic 
extractor, Sourceon, Dow Jones converter, Micromodem flags, Alarm, Selftest II, Transfer, Store & For- 
ward. 

AP09/FSII. 14 programmi richiamabili da un menù dedicati al mondo della fisica: Vector resolution, Vector 
addition 1 e 2, Dot e cross products in m/d form, Vector/scalar quiz, Circular motion, Kinematics e altro 
ancora. 


ca la parola: con questa routine in linguaggio mac¬ 
china Apple// può pronunciare quello che volete. 
L.30.000. 

APPLICANDO 21 

AP21/N46 Architetto. Un programma per studia¬ 
re sul video la disposizione di mobili, porte, fine¬ 
stre e muri, spostandoli a piacere, modificandone 
le dimensioni, duplicandoli, facendoli ruotare.. E 
poi, naturalmente, stampando il tutto. Autocorsa. 
A tutta birra lungo una pista con vere e proprie vo¬ 
ragini e massi da schivare. A ogni videata cambia la 
difficoltà del percorso, e la sosta ai box riserva 
qualche interessante sorpresa. By-pass per il dum- 
p. Una scorciatoia per accedere alla routine di 
stampa, e solo a quella, senza bisogno di attraver¬ 
sare prima tutto il programma: basta by-passar¬ 
lo! Cursore. Per lo spostamento del cursore Ap¬ 
ple// usa gli ingombranti comandi HTAB e VTAB; 
è invece possibile utilizzare speciali caratteri di 
controllo nelle stringhe stampate, grazie a questo 
programma in codice macchina. Grafica. Un altro 
passo avanti verso la perfetta padronanza della 
grafica in altissima risoluzione: come animare sullo 
schermo le figure a blocchi e come dare l'impressio¬ 
ne che scorrano dietro un altro oggetto. Curve di 
titolazione. Interessa gli studenti (e gli insegnanti) 
di chimica questo programma del Progetto Sera- 
phim: inserite le debite variabili, e assegnato il no¬ 
me all'acido che si sta studiando, traccia sul piano 
cartesiano la relativa curva di titolazione. Lire 
30.000. 

APPLICANDO 22 

AP22/N47 Impegni. Polizze che scadono, appunta¬ 
menti, anniversari e compleanni. Per avere sempre 
sotto gli occhi un promemoria elettronico, ecco un 
calendario intelligente. Azzardo. Il computer diven¬ 
ta mazziere di BÌackjack, in una simulazione che ri¬ 
calca fedelmente il funzionamento delle slot machi¬ 
ne di Las Vegas. Effetti speciali. L'importanza di u- 
na gradevole presentazione non va sottovalutata, 
quando si realizza un programma. Consente lo scor¬ 
rimento orizzontale di una stringa, alla velocità volu¬ 
ta, per vivacizzare un menù, un titolo, oppure... Ca¬ 
lendario. Ecco un calendario perpetuo, perfetto, ve¬ 
loce e sempre pronto. Grafica. Creare intere imma¬ 
gini e figure a blocco sullo schermo Hi-Res, e poi a- 
nimarle. Chimica. Il famoso numero di Avogadro e il 
concetto quantitativo di mole: la visualizzazione aiu¬ 
ta a spiegarli e ad apprenderli meglio. Lire 
30.000. 

APPLICANDO 23 

AP23/N48 Obelisk. Un game spaziale, alla caccia 
di obelischi da distruggere, con singoli colpi o con u- 
namegaesplosioneProgrammarel'ApplemouseCo- 
me programmare sull’Apple in modo da utilizzare il 
mouse? In Applesoft o in Assembler, ecco un aiuto 
prezioso per la programmazione e l'utilizzo dell'Ap- 
plemouse. Più che diapositive. Per realizzare pre¬ 
sentazioni con il computer che siano qualcosa di più 
di un continuo scorrere di diapositive: l'effetto 
“solid state"! Grafica. Programma dedicato alla 
doppia alta risoluzione: scorrimento orizzontale di 
scntte e figure. Lire 30.000. 

AP23/A49 Trasferimento da Apple a Mac. Un pro¬ 
gramma eccezionale e nuovissimo: trasferire testi 
dall'Apple //e e //c al Macintosh è ora possibile e, 
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Bridge AP12/N20 

Per imparare a giocare 
a bridge o per esercitarsi 
giocando contro il computer 
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quel che più conta, semplice e ultrasicuro. La confe¬ 
zione comprende un dischetto da 3 pollici e mezzo e 
uno da 5 pollici e un quarto. Lire 50.000. 

AP23/N50 Grafici 3D. Un programma che consen¬ 
te la realizzazione di grafici a tre dimensioni senza 
linee nascoste. Quale elemento? Un trivia di chimi¬ 
ca, per ripassare giocando i nomi e le caratteristi¬ 
che di tutti gli elementi della tavola chimica. Le do¬ 
mande le fa lo studente, e dalle risposte del compu¬ 
ter deve ricavare la soluzione finale. Lire 20.000. 

APPLICANDO 24 

AP24/N51 Executive Card File. Uno schedario ec¬ 
cezionale per Apple II. E' strutturato in modo che 
le schede possano essere riposte in dieci racco- gli- 
tori: un’ infinità di dati con la massima velocità di 
reperimento. Apple Maestro. Tutti compositori, 
con questo programma che insegna a creare musica 
in modo professionale, manon perquesto inaccessi¬ 
bile ai profani. Lire 35.000. 

AP24/N52 Dump 80 colonne. Un programma per 
ottenere la stampa della pagina schermo a ottanta 
colonne: proprio quello che finora non avreste potu¬ 
to chiedere a! vostro Apple. Date and time. Senza 
più dover ricorrere a costose schede aggiuntive, 
potete inserire nel vostro computer un calendario 
e, soprattutto, un orologio. Grafica. (Don l'aggiunta 
delle routine per lo scorrimento verticale il mondo 
della grafica in doppia alta risoluzione non ha più 
difficoltà né segreti. Lire 30.000. 

AP24/N53 Prospettiva 3D. Questo programma è 
il seguito naturale di quello contenuto nel disco AP- 
23/N50: come disegnare intere prospettive urba¬ 
ne, senza che il computer mostri i lati e le facce che 
devono rimanere nascosti. Test scolastici. Come 
crearsi un trivia "aperto", cioè non confinato a una 


sola materia e aperto a ogni intervento. Un modo 
nuovo e intelligente per ripassare (o giocare) L. 
20 . 000 . 

AP24/A55 Utility Dos 3.3. Questo dischetto con¬ 
sente a tutti coloro che hanno acquistato un Ap¬ 
ple// dopo il maggio 1984 di avere a disposizione il 
sistema operativo Dos 3.3 indispensabile per rico¬ 
piare alcuni programmi presentati da Applicando. 
Insieme al sistema operativo vengono fornite quat¬ 
tro interessanti utility per la gestione dei file Dos. 
Il dischetto contiene tutte le informazioni necessa¬ 
rie. Lire 25.000. 

APPLICANDO 25 

AP25/N56 Chart Manager. Un programma profes¬ 
sionale per la gestione dei dati, aziendali o familia¬ 
ri: ordina, calcola, modifica e poi traccia il grafico 
prescelto, a curve, a barre o a torta. Grafica. Quale 
logica è preposta all'alta risoluzione nell'Apple? 
Queste routine in LM consentono un buon approccio 
al problema attraverso la gestione delle figure a 
blocchi. Lire 35.000. 

AP25/N57 Apple Checker. Un vero amico per chi 
copia da sé i programmi: controlla se sono stati 
commessi errori di battitura. Buffer di stampa. 
Spooler è un programma che utilizza la scheda lan- 
guage card nell'Apple 64 per "parcheggiare" i da¬ 
ti; così mentre stampate potete continuare a lavo¬ 
rare sullo schermo del computer. Cinetica. Un inte¬ 
ressante esperimento di laboratorio: analizzate la 
variazione di velocità in funzione delle concentrazio¬ 
ni dei reattivi e della temperatura. L 35.000. 

APPLICANDO 26 

AP26/N59 Ants. Un gioco ai confini della realtà, 
terrificante e divertente: gigantesche, spuntano 
dal vostro giardino delle omicide formiche mutanti. 
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API O/FSII. Dalla serie di adventure del fantastico mondo di Eamon, un gioco di avventura che vi porterà 
nella tana del minotauro. 

API 1/FSII. 20 passatempi per un relax al computer: Computer Ralph, Analyst computer, Decision maker, 
Oroscopo, Poeta, Ad lib 1, Calcolo delle probabilità, Calendario perpetuo, Mirrar print image e altro anco¬ 
ra. 

API2/FSII. Satelliti, costellazioni, pianeti, conversioni astronomiche: 10 programmi per sapere tutto sul¬ 
l'astronomia, segni zodiacali compresi. 

AP13/FSII. Quiz, messaggi musicali, storia in alta risoluzione grafica, calendari, festività: tutto per un vali¬ 
do e originale insegnamento della religione cristiana. 

AP14/FSII.1 5 programmi di utilità generale: Dieta, Contacalorie, Ricette, Bioritmi, Test di longevità, Rea- 
der improver, urandapple clock, Calendario, database per anniversari e compleanni, e un word processor. 

API 5/FSII. 15 giochi in stile videogame: Volleyball, Snake, 3-D tic tac toe, Crypto, Orbit, Solitaire, Del 
mar, Craps, Apple capture e altri ancora. 

API6/FSII. Oltre 20 giochi dei Quali la maggior parte di simulazioni e di strategia: Football amencano, 
French military game, Xombat, World maze war, Golf, Horse race, Hockey, Ping pong, Gold mine, Kingdom, 
Black jack, Survive e altri ancora. 

AP17/FSII. Oltre 20 utility con un catalog un po' particolare: per ogni file viene descritta la funzione del 
programma oppure se è semplicemente un file usato come routine. Fra gli altri: Disk arranger, Disk check, 
DisK map, Diskscan, Disk cat, Catalog management, Krunch, Fastboot, Undelete. 

AP18/FSII. Oltre 20 utility: Map a file, Post editor, Bootleg assembler, Copy single dnve, Disassembler 
machines code, Diskquick e tante altre. 

API 9/FSII. Education. Una decina di programmi didattici di matematica e aritmetica. 

AP20/FSII. Business. Strumenti e programmi per imparare le operazione di borsa e per gestire il portafo¬ 
glio titoli. 

APTOT/FSII. Utilizzate questa sigla per ordinare tutti e 20 i dischi di FreeSoftware al prezzo particola¬ 
re di 160 mila lire (8.000 lire a dischetto). 


File name mover. All’inizio l'Hello sta scritto al pri¬ 
mo posto nel Catalog, ma poi si sposta... Per fare 
un po' di ordine nei nomi dei file questa utility è indi¬ 
spensabile. Sistemi di equazioni lineari. Molti sono 
quasi impossibili da risolvere senza computer, per 
la loro interminabile complessità. Questo program¬ 
ma può affrontare fino a 70 equazioni, con fino a 
70 variabili. E naturalmente stamparle. Lire 
35.000. 

AP26/A60 Irpef (occorre VisiCalc). Per compila¬ 
re più in fretta la dichiarazione, e tenersi aggiorna¬ 
ti con le aliquote in corso, con la potenza del foglio 
elettronico. Lire 25.000. 

AP26/A61 Irpef (occorre AppleWorks). Lo stes¬ 
so del precedente, ma in versione AppleWorks. Li¬ 
re 25.000. 

AP26/N64 Certificatore di dischetti. Aprire una 
seconda tacca nel dischetto per sfruttare anche la 
memoria della faccia posteriore? Con questo pro¬ 
gramma lo si può fare senza timori: controlla tutte 
le tracce e segna come già utilizzati i settori even¬ 
tualmente difettosi. Grafica. L'animazione di figure 
a blocchi si può gestire in più modi; ecco alcune rou¬ 
tine chiave, interdipendenti. Lire 25.000... 

AP26/A65 II dominio di Meandro. Finalmente un a- 
dventure tutto italiano, che però non ha nulla da in¬ 
vidiare ai professionali d'importazione. Alla ricerca 
del Grande Segreto, nascosto oltre lo specchio e 
dentro la fantasia. Lire 35.000. 

APPLICANDO 27 

AP27/N66 Chitarra. Un maestro ti insegna gli ac¬ 
cordi, mostrando sul video in bassa risoluzione chia¬ 
rissime istruzioni grafiche per la diteggiatura; una 
speciale routine, poi, controlla gli errori commessi. 


Crono. Relegato nel Tartaro all'inizio dei tempi da 
Zeus, Crono ne emerge oggi e sferra un attacco 
mortale per il potere universale... Armati del fulmi¬ 
ne divino, dovete sconfiggerlo. Lire 35.000. 

AP27/N67 Remlnder. Per tenere sotto controllo 
la gestione domestica, ecco un programma multifor¬ 
me: è un gestore prestiti, un custode delle scorte 
freeezer, un programmatore per l'orto, un'agenda 
delle incombenze e dei lavori... Grafica. Tutte le im¬ 
magini grafiche, provenienti da qualsiasi program¬ 
ma, possono divenire tavole di figure a blocco. Con 
questoprogramma,poi,nonoccorrenemmenocono- 
scerne le coordinate. Postmaster. Può estire cento 
indirizzi, ordinarli in ordine alfabetico e modificarli 
quando serve, ma soprattutto è un formidabile 
stampaetichette, per ogni stampante. Appletrig. 
Seno e coseno, tangente e cotangente, secante e co¬ 
secante: tutte le funzioni trigonometriche. L. 
35.000. 

APPLICANDO 28 

AP28/N74 Supershopper. Un programma versati¬ 
le e intelligente che pianifica gli acquisti per una ge¬ 
stione ottimale, senza sprechi né amare sorprese, 
del frigorifero e delle scorte freezer. Planetario. 
La volta celeste sullo schermo, con i movimenti e le 
magnitudini delle stelle, in una perfetta simulazio¬ 
ne: basta impostare l'ora e le coordinate del luogo 
da cui si vuole osservare la notte. Lire 35.000. 

AP28/N75 Millenote. Una routine per la creazione 
di musica, completa di staccato, corone, ritardi e 
pause, per personalizzare giochi e programmi con 
simpatici effetti sonori. Scatola nera. Un classico 
ioco di deduzione nell’era atomica: dal grado di fl¬ 
essione del raggio lanciato dentro la scatola biso¬ 
gna indovinare le posizioni degli atomi contenuti. Te- 
xt file. Ottima routine per la gestione dei listati co¬ 


me file di testo; rende più veloci e agevoli le corre¬ 
zioni. Grafica. L'animazione delle figure a blocco con 
effetti speciali. Lire 35.000. 

AP28/A76 Gin. E' il gioco del momento, e ha un so¬ 
lo difetto: calcolare il punteggio è laboriosissimo. 
Nessun problema, però, se si usa questo program¬ 
ma contapunti. Lire 20.000. 

APPLICANDO 29 

AP29/N79 Movie construction set. Realizzare veri 
e propri cartoni animati, e guardarti poi scorrere 
sul video è possibile, con questo programma ricco, 
ma semplice da usare. Window magic. Come su Ma¬ 
cintosh, i menù del II si possono gestire con fine¬ 
stre e icone. Grafica. Lo schermo si anima di effetti 
magici: lo scorrimento animato diventa realtà L 
35.000. 

AP29/N80 Special Utilities. Due utility, in accop- 

C iata vincente: Supercharger e Crunch-Decrunch. 
a prima comprime in memoria le immagini in Hi- 
Res, la seconda estende il potenziale dell'Appte- 
soft in DOS 3.3. L 35.000. 

APPLICANDO 30 

AP30/A84 Rubrica. Per ottimizzare l'uso del tele¬ 
fono, ecco una rubrica elettronica di altissimo livel¬ 
lo, per gestire e aggiornare perfettamente tutti i- 
numeri che vi possono seme. Attenzione: la rubri¬ 
ca è capace anche di far comporre il numero, se ab¬ 
binata all'apposito combinatore telefonico. Orto. 
Un programma in Pascal per studenti e professio¬ 
nisti: corregge automaticamente, grazie a due voca¬ 
bolari già creati in parte, gli errori di ortografia in 
testi e listati. Serve Pascal 1.2 e versioni successi¬ 
ve. Lire 35.000. 

AP30/A85 Combinatore telefonico. E' un hardwa¬ 
re indispensabile per sfruttare al massimo le carat¬ 
teristiche del programma Agenda: compone auto¬ 
maticamente il numero telefonico. Lire 90.000. 
(Non ordinabile in abbonamento ma solo singolar¬ 
mente). 

AP30/N86 Ampergo. Questa utility potentissima, 
basata sull’utilizzo del comando ampersand (&), e- 
stende il potenziale dell'Applesoft in DOS 3.3. Pin¬ 
guino. Dolce e appassionante, la lotta di Sammy il 
pinguino che per salvare la sua isoletta scaglia bloc¬ 
chi di ghiaccio. Turile Basic. La tartaruga, il tipico 
cursore del Logo, dà il nome a questo programma 
che "insegna" al Basic le parola chiave per pro¬ 
grammare la grafica Grafica. Sullo schermo dell'al¬ 
ta risoluzione è possibile inserire caratteri di te¬ 
sto, e in qualunque posizione. L. 35.000. 

APPLICANDO 31 

AP31/N90 Sci. Alla vigilia delle settimane bianche, 
meglio verificare la propria efficienza fisica con 
questo test. Libreria di subroutine. Per tenere tut- 
teassiemequellecheservonodi più. Buon complean¬ 
no. Un allegro coro di "Tanti auguri" guidato dal¬ 
l'Apple: la musica la suona lui. Navigator. La parte 
più importante di un listato è la documentazione: ec¬ 
co listati formattati e diagrammi di flusso in un ba¬ 
leno. Grafica. Scorre il testo sullo schermo Hi-Res. 
Lire 35.000. 

APPLICANDO 32 

AP32/N94 Ram Disk. Un simulatore di disk drive 
con 170 settori di memoria RAM, per dimezzare i 
tempi di caricamento. Per IIC e Ile scheda 80 colon¬ 
ne. DOS-ProDOS Doubleboot. Un ponte tra i due 
sistemi operativi, ora disponibili contemporanea¬ 
mente e attivabili a piacere con un clic. Lire 
35.000. 

AP32/N95 Automatic Function Plotter. Diagram¬ 
mi di funzione in Hi-Res, con scala automatica, so¬ 
vrapposizione di tracciati, apposizione di diciture. 
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Compass Quiz. Un educational per bambini di otto 
anni circa, per insegnar loro l'uso della bussola. Li¬ 
re 35.000. 

AP32/A96 Xenar. Un adventure tutto italiano, am¬ 
bientato in America latina, alla ricerca dei segreti 
di un popolo scomparso. Lire 25.000 

APPLICANDO 33 

AP33/N99 AppleBanker, per la gestione finanzia¬ 
ria domestica. Duetto. Inserite nei vostri program¬ 
mi il suono a due voci. I programmi di papà. Quattro 
programmi in Applesoft per giocare, disegnare e 
scrivere con i figli. L. 35.000. 

AP33/N100 List master. Questa eccellente routi¬ 
ne stampa un listato formattato del programma in 
Applesoft evidenziandone la struttura. Timer. Uti¬ 
lity per usare i comandi che tracciano linee sulla pa¬ 
gina testo. L. 30.000. 

APPLICANDO 34 

AP34/N102 Arcade sound editor. Generatore di 
suoni a due tonalità per i vostri giochi. Iris. Realizza 
un effetto di dissolvenza a iride tra due immagini 
in Hi-Res. L 35.000. 

AP34/N103 Tre utility: Subroutine Master (crea 
una libreria di subroutine in Applesoft), Copy per 
ProDOS ( copia i file senza disturbare il program¬ 
ma in Basic) e Disk Lock per proteggere l'intero di¬ 
schetto. Crosswind. Simulazione del gioco del foot¬ 
ball americano con tutti i calcoli della direzione del 
vento. L 35.000. 

AP34/A104 Conto corrente. Per la gestione com¬ 
pleta del vostro conto corrente bancario (occorre 
Appleworks). Portfolio. Un'applicazione Apple- 
Works per giocare a Portfolio con Repubblica e 
Applicando. L. 25.000. 

APPLICANDO 35 

AP35/N107 Disk librarian. Un bibliotecario per la 
catalogazione e la gestione di tutti i dischetti: in 
ProDos, in DOS 3.3 e in Pascal. Screen creator. 
Per la creazione automatica di videate, risparmia 
la noiosa inserzione del codice. Mr.Ed. Questo com¬ 
patto editor di programmi rende più che mai facile 
l'introduzione dei programmi in Basic. Comprende 
l'autonumerazione e l'editing delle linee, con funzio¬ 
ni di inserimento, eliminazione e tabulazione. L. 
35.000. 

AP35/A1 08 Refertazioni Laboratori Analisi. Per 

la gestione automatica a video e su stampante delle 
cartelle cliniche, delle analisi e dei referti. L. 
20 . 000 . 

APPLICANDO 36 

AP36/N110 Meteo. Per dilettanti e professionisti, 
un programma per ordinare i dati e fare le 
previsioni del tempo. Super sort. Utility ad alta 
velocità per ordinare le matrici. Cross Reference. 
Costanti, variabili, riferimenti alle linee: tutti ben 
ordinati in pratici prospetti. L. 35.000. 

APPLICANDO 37 

AP37/N112 Font Foundry. Un potente editor per 
creare i propri set di caratteri in Hi-Res. Inverse 
Keywords. Breve routine in LM per evidenziare tut¬ 
te le presenze di qualunque parola chiave in un lista¬ 
to in Applesoft. Ram Disk. Un'utility per creare u- 
na RamDisk di 16 K in ambiente Dos 3.3; tutti i co¬ 
mandi disco funzionano come per un vero dischetto. 
L. 35.000 

AP37/A113 Antenne e SWR. Un programma che vi 
aiuterà nella costruzione della vostra antenna Mr. 
Mouse. Per utilizzare la potenza del mouse con nuo¬ 
ve istruzioni che interfaccino il basic col mouse. L. 
25.000. 


Programmi 
per Macintosh 

APPLICANDO 23 

AP23/A49 Trasferimento da Apple a Mac. Un pro¬ 
gramma eccezionale e nuovissimo: trasferire testi 
dall'Apple Ile e //c al Macintosh è ora possibile e, 
quel che più conta, semplice e ultrasicuro. La confe¬ 
zione comprende un dischetto da 3 pollici e mezzo e 
uno da 5 pollici e un quarto. Lire 50.000. 

APPLICANDO 24 

AP24/N54 MacGraph. Un programma favoloso 
per un uso professionale del Macintosh: può creare 
ogni tipo di grafico, a linee, a barre o a torta, che 
poi si può copiare e incollare in qualunque altro do¬ 
cumento (relazioni, documenti da proiettare...). Li¬ 
re 40.000. 

APPLICANDO 25 

AP25/N58 File Cabinet. Potenza e versatilità ca¬ 
ratterizzano il database per Macintosh: struttura¬ 
to come uno schedario, permette un'archiviazione e 
una gestione dati molto agile e intelligente. I criteri 
di classificazione, multipli, consentono la massima 
personalizzazione. Ure 40.000. 

APPLICANDO 26 

AP26/A62 Bioritmi. Un programma brioso, ma 


professionale nell’impostazione e nella grafica. Al¬ 
lietato dal disegno dei simboli zodiacali, traccia le 
tre famose curve fisico-emotivo-intellettive mese 
per mese, fa i confronti e dà il consiglio del giorno. 
Lire 40.000. 

AP26/A63 Irpef (occorre Multiplan). Il tempo del¬ 
le tasse, oltre ai noti dolori, comporta perdite di 
tempo e disguidi: per compilare più in fretta la di¬ 
chiarazione, e tenersi aggiornati con le aliquote in 
corso, questo modello sfrutta la potenza del foglio 
elettronico. Lire 25.000. 

APPLICANDO 27 

AP27/A68 Leasing (occorre Multiplan). Conti alla 
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MacGraph 

AP24/N54 

Un programma altamente 
professionale per creare 
ogni tipo di grafico, 
a linee, a barreo a torta, 
che poi si può copiare 
e incollare in qualunque 
altro documento 
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FreeSoftware per Macintosh 

I seguenti dischetti sono disponibili a lire 30.000 se ordinati uno per volta. A lire 75.000 per cinque di¬ 
schetti (praticamente 15.000 l'uno). E a lire 120.000 per dodici (10.000 lire l'uno). Questi prezzi si inten¬ 
dono Iva e spedizione comprese. Utilizzare il tagliando del DiskService, specificando il codice. 

PRIMA SERIE: 

APFS/A01. 22 programmi e documenti: stampa cataloghi DiskCat, programma di comunicazioni Free- 
Term 1.8, accesson-mela 20DAs e Other... 1,6b,impacchettatore di programmi Packlt II, gioco del biliar¬ 
do Billiard Parlour, e, utilissimi per l'hard disk, HFS Open e HFS Search. E: MacWait, Binnex 5.0, Chan- 
geApp, WayStation1.9b, Wator, Pong, Curve, Munch, Fractals, Aquarium. 

APFS/A02. 19 programmi e documenti: programma di comunicazioni Red Ryder 9.0, installatore di tasti 
funzione FKey, Maze 3D, Tree e altri ancora. 

APFS/A03. 22 programmi e documenti: generatore di icone Iconmaker, Utilities Fedit 3.05, MWRecover, 
MacWrite Rescuer 1.2, Fatdiskmaker, Drawpaint 1.0, MacRepair e ReadWrit, codificatore-decodificato¬ 
re di file ConCode. Inoltre: DAs SetSound&StuffClip, 2.0 macsampler, StringArt, Snow, Julia, Orion 
vi .0, Bin/Graphics, Munch, PepsiCaps, Pram. 

APFS/A04. 35 programmi e documenti fra cui il celebre psicoanalizzatore Eliza, Flashcard, Drill 1.52. I- 
noltre: MakePaint vi .1, Slide Show, SelectPaint, Spline Demo, Rays, StarMap, Stars, Pascal Runtime, 
Composers. 

APFS/A05. 14 programmi e documenti. In particolare giochi comeWave 15, Invaders, Juggler. Inoltre: Da- 
taFlow, Worm Stat, Engel's Enigma. 

APFS/A06. Occorre FileVision. 32 documenti di FileVision esplicativi. 

APFS/A07. Occorre Excel-Multiplan. 32 esplicativi di Excel e Multiplani. 

APFS/A08. 10 programmi e documenti, i giochi Reversi, Hangman, e MouseBall. Inoltre: Concentrato e 
Smooth Voice. 

APFS/A09. 31 programmi e documenti contenenti soprattutto caratteri (Fonts): Bubbles 14, 24, Hol¬ 
lywood Thin 24, Rangers 18, Lineai 18, Music Fonts, Ravenna 12, 24, newer keykaps, FontDisplay, FontDi- 
splay.doc, Andover, About (con, Icon, Taliesin, Music2, Thin, Small-9/10/18/20, Floor Plan-9/24, Paint 
18, Toyland 1/2 - 36, Toyland 1, 2, Demographics 36, Music, States, Calligraphy 12, 24, 18, 36, Candy 
12, Centura, Fargo 48, Houston 36, Ultra 24, Cavanaugh 18,36, Symbol-12. 

APFS/A10. 25 programmi con Fonts: Salamis, Sparta, OldChurch Slavonic, Greek.D, Moscow-24, Austin 
Math Font Docs, newer keykaps, FontDisplay, Babylon 9,18, Nordic 9,12, 18, Troyes 10,12, 20, 24, Scri- 
ptMath, Demographics-36, Erie 12, 24, FontDisplay.doc, Wartburg, German Script Font notes, Stut- 
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mano, qual è il tasso reale che vi tocca pagare? La 
convenienza di ogni contratto di leasing conteggia¬ 
ta su misura grazie a una applicazione di matemati¬ 
ca finanziaria sofisticata, ma semplice da usare. Li¬ 
re 30.000. 

AP27/N69 MacBanker. Un programma realmente 
all'avanguardia, che consente la stampa degli asse¬ 
gni su modulo continuo. Ma non solo: tutta la gestio¬ 
ne del vostro conto in banca, con verifica puntuale 
degli estratti conto che vi vengono inviati, con regi¬ 
strazione accurata di ogni vostro versamento e di 
ogni assegno che emettete, è affidata a MacBan¬ 
ker. L. 40.000. 

APPLICANDO 28 

AP28/N77. Cronometro. Un prezioso accessorio 
da aggiungere alla scrivania del Macintosh: tiene 
conto dei sessantesimi di secondo e stampa i nomi 
dei parziali. Radion Tyrant. Un avvincente gioco di 
strategia con griglia oi gioco e griglia di controllo. 
Ure 40.000. 

AP28/A78 Gin. Gin, il gioco del momento, ha un so¬ 
lo difetto: calcolare il punteggio è laboriosissimo. 
Nessun problema, però, se si usa questo program¬ 
ma contapunti. Lire 25.000. 

APPLICANDO 29 

AP29/N82 Maclnvestor. Un programma senza u- 
guali per la gestione del portafoglio titoli: permet¬ 
te un'agevole introduzione e modifica dei dati, la 
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MacBanker 

AP27/N69 

Un programma all'avanguardia, 
che consente la stampa degli 
assegni su modulo continuo. 

Ma non solo: tutta la gestione 
del vostro conto in banca, 
con verifica puntuale degli 
estratti conto, con registrazione 
accurata di ogni versamento 
e di ogni assegno emesso, 
è affidata a MacBanker 
v___/ 

memorizzazione dei movimenti e la resa grafica dei 
resoconti. E’ uno dei programmi più completi del 
settore e in assoluto il più economico. Lire 80.000. 

AP29/N83 I Ching. Un metodo di previsione del fu¬ 
turo che riassume la saggezza degli antichi cinesi. 
Questa versione elettronica è la prima che ne con¬ 
serva la complessità. Ure 35.000. 

Continua a pagina 129 


igart 12, 24, Palo Alto 12, 24, Nordic 12, 9, 18 24, Washington 9,12,18, 24, Copenhagen 9,12,18, 24, 
Oamelot 12,24, ChicMath, Austin math font. 

APFS/A11. 33 programmi con Fonts e strumenti per gestirli: Geneva-12, Geneva-24, Princeton-12, Prin- 
ceton-24, new key caps, Read Me, Princeton2.1/24, Princeton2.1/12, Read Me 2, Read Me 3, Long Island- 
12 e 18, Stuttgart-12, Camelot-12 e 24, Stuttgart-24, East Orange-12, Square Serif-24, Broadway- 
24, Font Lister, Font Editor, Resource Mover, Font Mover, Contents, Part 1 , Part 2, Part 3, Part 4, 
Part 5, Part 6, Part 7, Font Doubler, Set File Attributes. 

APFS/A12. 12 programmi e documenti: coniugatore di verbi francesi Le Conjugueur, autostampatore Ya- 
pun 3.0, compattatore di file Compact, e il copiatore Copybits. Inoltre: Curves, Simutree, Smile, Mel- 
tdown, Antithett Icon, Venn, Card bic, Very New Fonts. 

APFS/A13. Per ordinare 5 dischetti al prezzo speciale di 75.000 lire, indicare nel buono d'ordine di pag. 
1 30 questa sigla, seguita dalle sigle dei 5 dischetti desiderati, a qualsiasi serie appartengano. 

APFS/A14. Per ordinare tutti i 12 dischetti della pnma sene, da APFS/A01 a APFS/A12, al prezzo spe¬ 
ciale di 120.000 lire basta indicare nel buono d'ordine di pag. 130 questa sigla. 

SECONDA SERIE: 

APFS/A15. Contiene 17 immagini, memorizzate come documenti Paint: disegni o immagini digitalizzate con 
Tunderscan o MacVision, che permettono di aumentare la creatività nella preparazione di documenti, inviti, 
biglietti di memo. 

APFS/A16. Oltre 20 accessori di scrivania installabili nel System sotto il menù mela, accompagnati dal 
nuovo Font/DA Mover 3.2 e da MacSampler 2.0, che consente di vedere in funzione questi accessori di scri¬ 
vania senza doverli installare tutti. Tra gli accessori più interessanti troviamo un Calendario, un emulatore 
di terminale VT-52, il gioco famoso del cubo di Rubik, SetFile che serve per controllare le caratteristi¬ 
che di un qualsiasi File. 

APFS/A17. Oltre 22 tra Utilities, accessori di scrivania e documentazione. Tra le Utilities segnaliamo Kee- 
per, per velocizzare tutte le operazioni che passano via Finder, e FastFormatter 2.1, che permette di inizia- 
lizzare velocemente quanti dischetti si desidera; invece tra gli accessori di scrivania troviamo una calcola¬ 
trice finanziaria, HD 20 Backup, per eseguire il salvataggio di dati contenuti su un disco rigido, ed uno 
ScreenDump. 

APFS/A18. Oltre 12 tra programmi e documentazioni, tra cui Ram Start 1.233, in grado di creare una 
RamDrive, WayStation 2.6, per saltare da un programma all'altro senza passare via Finder, Switcher 
5.01, ultima versione aggiornata del famoso programma che permette di caricare più di un'applicazione con¬ 
temporaneamente, con relativa documentazione, Window Shell, Font/DA Mover 3.2. 

APFS/A19. Contiene un serie di Utilities per tenere in ordine i dischetti di una biblioteca software, come 
Disk Ranger, Directory 0.9, Phantom Catalog, Phantom Directory, Phantom Disk Report e The Parer 1.5, 
o per evitare, tramite un encriptatore, come Encryptor, sguardi indiscreti nei vostri documenti. 
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APFS/A20. 7 programmi con relativi documenti, tra cui Page Setup Customizer, PCS Kernel, 
PCS Menu, YAPU 3.2,WS to MW, Calendar Maker ™ 2.0 con 1986 Calendar, e la possibilità di 
creare calendari personalizzati anche per i prossimi anni. 

APFS/A21. Oltre 20 tra programmi, documenti e disegni, tra cui Hints-MacPaint, Painter's Hel- 
per, Bill's Paint Copier, Slide Show, Screen Maker 2.0, JoyPaint, Icon Maker, quest'ultimo previsto 
come accessorio di scrivania da installare sotto il menù mela. 

APFS/A22. Oltre una decina di Utilities, tra cui JCIock, ACIock, Clock, MacWait 2.0, Fast Eddie 
2.2 Limited, Iconer, DisAsm, DrawPaint 1.0 per trasformare files Draw in files Paint, TabUtil, 
MSGHDR, HFSOpen 2.0. 

APFS/A23. 14 Utilities relative all'uso dei supporti magnetici (dischetti e dischi rigidi), tra cui 
SonyTest, PatchDisk, Examine File, System Version.SHRINKTOFIT, Rescue, File, Icon Exchanger 
2.0, DevTooIs 1.1, DiskBench 1 .1, Icon Creator, PD Backup HD, PD Restore, lnfo+. 

APFS/A24. Oltre 13 Utilities relative a Finder, System, Fonts di caratteri e Directory, accompa¬ 
gnate da files di informazioni, tra cui Startup Desk, MacID, Describe, Sequencer, Archiver e Ma¬ 
nuale, Compact, File Conversion, Font Tester, Get Keys, HFS Dir 0.98, Window Changer, Write- 
Stream. 

APFS/A25. Contenente oltre 30 fonts di caratten, e due Utilities relative: FontDisplay 4.0 e Fon- 
t/DAMover 3.2. Tra i Fonts ncordiamo: Trekkies-18, Greek-9/24, Circuits-14, Halfa-12, Jour- 
ney-12, Secret-24, Saturn-18, Philly-12, Sidney-12, Dalì-24, Runes-12/24, Border-12, Exeter- 
13, Hood River-1", LED-24, Tokyo-24, Digits-14, Giants-18. 

APFS/A26. 14 Utilities, con relative informazioni, per chi lavora con Word Processing, per chi de¬ 
ve duplicare o inizializzare velocemente dischetti: ThinkTank to WP, Q/reader 1.0, Fix MacWrite, 
Case Converter, ScreenEdit, Clean Up, Soft-Tools, SpellCheck, 512K Copy, MassCopier, Mass I- 
nit, SuperCopy, MacClone, MacClone 2.0 

APFS/A27. Per ordinare tutti i 12 dischetti della seconda serie, al prezzo speciale di 120.000 lire, 
basta indicare nel buono d'ordine di pag. 130 questa sigla. 

TERZA SERIE: 

APFS/A28. Occorre Mac Draw. 32 documenti e templatesMacDraw modificabili a piacere: tra es¬ 
si un calendario perpetuo. 

APFS/A29. Dischetto con giochi tra cui Torpedos, The Adventures of Snake, Wargle e un creato¬ 
re di Adventure per chi è stufo dei giochi di avventure tradizionali e vuole crearseli da sè. 

APFS/A30. Contiene una decina tra programmi e documenti per quanto nguarda le trasmissioni 
dati via modem o accoppiatore acustico, tra cui Pretty Good Term, TermWorks 1.2, AppleTermi- 
nal, Packit III, UnPacker, Binhex 4.0, Binhex 5.0, FreeTerm 1.8. 

APFS/A31. Oltre 20 accessori di scrivania installabili nel System sotto il menù mela, accompagna¬ 
ti dal nuovo Font/DA Mover 3.2 e da MacSampler 2.0, che consente di vedere in funzione questi ac¬ 
cessori di scrivania senza doverli installare tutti. Tra gli accessori più interessanti:Q-Dial 1.5, Rolo- 
dex, Disk Labeler, Big RPN, CopyFile, CrashFix, Window DA, File Transfer, Disk Info 1.42, FrCal- 
cDA File ed Help, WordCount. 

APFS/A32. Contiene una serie di programmi di sintesi vocale; ogni programma è accompagnato dal¬ 
le relative istruzioni. Tra essi: Rona, La Limerick Machine, Speak Easy, MacinTalk 1.1. 

APFS/A33. 10 programmi e documenti, tra cui QuickFile, "Worm" Statistics, MortageCalc, Ban¬ 
ner Printer, dCAD Calculator, Regression Analyzer, HP12C Calculator. 

APFS/A34. Oltre 15 fonts di caratteri, con due Utilities (FontDisplay 4.0 e Font/DAMover 3.2): 
Stiletto-14/24, Bubbles-14/24, Eon-12, Ham-14, Lineal-18, San Quentin-24, Hollywood-24, Si¬ 
licon Valley-10/20, Berkley-18, Future-9/24, Akashi-12. 

APFS/A35. Oltre 20 accessori mela, accompagnati dal nuovo Font/DA Mover 3.2 e da MacSam¬ 
pler 2.0, che consente di vedere in funzione questi accessori senza doverli installare tutti. Tra i più 
interessanti: Set Default, NewCamera, Macro 0.9, Function Key's, Maxwell 2.1, WCDA 3.0, The- 
Box, UnixEM, FixUp, Charger, Panie, KeyMouse, SpliCat, LifeSaver, Utilities 2.0. 

APFS/A36. 10 programmi e documenti tra cui Inventory, Parametric Stats. Regression Linear 
and Multiple, LCS, PSI con Help files ed esempi già pronti. 

APFS/A37. Oltre 10 programmi di Utilities e documenti, tra cui CrashGuard, MapScan, DA Test 
1.51 , Disk Ubrarian 1.7, Hard Disk Backup, Scheduler. 

APFS/A38. Oltre 10 educational, con relative informazioni, tra cui Drill, Animals, Anatomy, Master 
Guess, Pattern Blocks, Fractals, Grades, FlashCards, Orbitai Mixing ed Orbitai Mixing Help. 

APFS/A39. Programmi di sintessi musicale, ognuno con le sue istruzioni, tra cui: Wave Maker, 
Weird Soundsl, Weird Sounds2, Bop, Hendrix2.0, Keyboard, Mozart, MacTalk, AppleTones. 

APFS/A40. Per ordinare tutti i 12 dischetti della terza serie al prezzo speciale di 120.000 lire, 
basta indicare nel buono d'ordine di pag. 130 questa sigla. 
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APPLICANDO 30 

AP30/N88 MacSprint. Leggere di più e meglio. 
Leggere bene anche in inglese. Insegnare la lettura 
veloce anche ai bambini. Ecco i tre obiettivi che que¬ 
sto allegro, ma molto professionale programma sa 
conseguire. L. 35.000. 

AP30/A89 SuperSorter. Meglio di un database, 
SuperSorter mette in ordine alfabetico i dati con¬ 
tenuti in un file e anche gli appunti del Block Notes: 
sa con che lettera inizia un numero, sa ignorare l'ar¬ 
ticolo iniziale di un titolo e sa invertire gli ordini 
precedenti. L. 30.000. 

APPLICANDO 31 

AP31/N92. Zoom. Un database grafico, struttura¬ 
to a "diapositive", con effetto zoom, per ingrandi¬ 
re i particolari. Mappe, diagrammi, disegni, testi...: 
potete partire dalla carta geografica d'Italia e ar¬ 
rivare, per ingrandimenti successivi, al portone di 
casa. Lire 35.000. 

AP31/A93. Bilancio aziendale. Un programma di a- 
vanguardia per la riclassificazione dei bilanci. 
•Sfrutta la potenza dello spreadsheet di Excel e ge¬ 
nera anche tre grafici. Aggiornato con le ultime 
normative Cee. va usato con il programma Excel 
della Microsoft e con Macintosh Plus e drive da 
800 K. L. 200.000 (Non ordinabile in abbonamen¬ 
to ma solo singolarmente). 

APPLICANDO 32 

AP32/N98 MacMusic. Sfrutta appieno le quattro 
voci del Mac senza por freno alla creatività; gesti¬ 
sce dasololeconversioni numeriche. E'possibile va¬ 
riare volume e forma d'onda. L. 40.000. 

APPLICANDO 33 

AP33/A101 Briscola. Un'appassionante sfida a 
carte scoperte, basata su accorti calcoli e previ¬ 
sioni quasi algebriche, contro il Mac. L. 40.000. 

APPLICANDO 34 

AP34/N105 Shopper Mac. Per tenere aggiornata 
la lista della spesa MacBanner. Crea manifesti per 
tutte le occasioni. L. 40.000. 

AP34/A1 06 Orto e giardini. Per la gestione di un 
appezzamento agricolo (occorre Business Filevi- 
sion). L 20.000. 

APPLICANDO 35 

AP35/A109 Flaming fingers. Simpatico e molto ef¬ 
ficiente, è un allenatore che trasforma tutti in dat¬ 
tilografi abili e veloci. L 30.000. 

APPLICANDO 36 

AP36/N111. Movie Constmction Kit. L’animazione 
finalmente a portata di Macintosh: per fare film e 
poi rivederli, con moltissime opzioni. L. 35.000. 

APPLICANDO 37 

AP37/N114. Painter. Effetti ombra, retini, uso 
del carboncino, sguardo d'insieme: ecco le caratte¬ 
ristiche principali di questo programma da utilizza¬ 
re per migliorare le prestazioni di MacPaint. L. 
35.000. 

AP37/A115. Antenne e SWR. Dedicato espres¬ 
samente ai radioamatori, questo programma li aiu¬ 
terà nella costruzione della vostra antenna. L. 
20 . 000 . 

AP37/A1 16. Riclassificazione con Excel. Per 

riclassificare i bilanci aziendali con lo spreadsheet 
più potente e flessibile. Nota spese. Una macro per 
creare al volo note spese professionali (occorre 
Excel). Lire 60.000. 


- Nuova opportunità - 

\ per inostri / 
lettori 

Abbonamento 
DISK SERVICE 

Applicando è lieto di offrire ai propri lettori la 
possibilità di sottoscrivere un abbonamento 
a 5 o 10 dischetti, a scelta fra quelli presentati nel 
Disk Service, a un prezzo super vantaggioso: 

120.000 lire per 5 dischetti Apple II 
200.000 lire per 10 dischetti Apple II 
175.000 lire per 5 dischetti Macintosh 
300.000 lire per 10 dischetti Macintosh 

Pagherete, rispettivamente, 24.000, 20.000, 35.000 
o 30.000 lire a dischetto, Iva e spese di spedizione 
comprese 

qualunque sia il prezzo di vendita 
del singolo dischetto. 

Basta che compiliate il tagliando qui sotto e lo 
inviate ad Applicando, abbonamenti Disk Service, 

Corso Monforte 39, 20122 Milano, unitamente a un 
assegno non trasferibile intestato a Editronica srl 
e al vostro primo ordine. 

Per ordinare i dischetti, adesso e in seguito 
utilizzate il buono d'ordine pubblicato alle pagine 
seguenti, specificando sempre che siete un 
abbonato del Disk Service. L'abbonamento non ha 
scadenza, quindi i 5 o 10 dischetti potete ordinarli 
quando più vi aggrada. 

->cg — 

Sì, desidero sottoscrivere il seguente 
abbonamento al Disk Service: 

— 5 dischetti con programmi Apple II, per 120.000 lire 

□ 10 dischetti con programmi Apple II, per 200.000 lire 

□ 5 dischetti con programmi Macintosh, per 175.000 lire 

□ 10 dischetti con programmi Macintosh, per 300.000 lire 

Nome --- 

Cognome - - - 

Indirizzo —- 

Cap - Città - PV — 

Data - Firma - 
























Applicazioni Omnis3 pronte per l'uso 

Applicando mette a disposizione dei lettori una serie di applicazioni già pronte », preparate con OMNIS3, che tocca¬ 
no i più svariati campi. Saranno tutte offerte a basso prezzo, e funzioneranno con il RUNTIME di Omnis3, che acqui¬ 
stato una volta può essere poi usato anche con più di una applicazione. Ovviamente chi possiede il programma Óm- 
nis3 potrà fare a meno di acquistare il RUNTIME:, che può essere richiesto ai migliori computer shop o a Editronica 
insieme alle applicazioni, utilizzando il tagliando del Disk Service. 

Queste applicazioni e il RUNTIME non si possono ordinare usufruendo dell'abbonamento al Disk Service. 

FATTURAZIONE E MAGAZZINO - AP27/A70 

Per chi ha stampa molte fatture, andando a pescare i dati del venduto da un magazzino e quelli identificatori del 
cliente da un archivio. La procedura permette la personalizzazione della stampa delle fatture. Funziona sia su Ma¬ 
cintosh 512K sia con Macintosh Plus, con doppio drive e stampante ImageWriter. NUOVA VERSIONE POTENZIATA. 
Lire 272.500 Iva 9% e spese di spedizione comprese. 

PREVENTIVAZIONE - AP27/A71 

Per una gestione del magazzino molto ampia e complessa, può gestire il carico e lo scarico automatico dal magazzi¬ 
no, il controllo delle merci a stock, l'inventario di magazzino con la relativa movimentazione, le chiusure periodiche e 
annuali, la gestione dell'elenco Clienti e. Fornitori, e la gestione di preventivi e di commesse di vendita o acquisto. 
Può funzionare sia con il Mac da 512K che con il Plus, con ImageWriter, ma si consiglia l'uso di un Hard-Disk o di dri¬ 
ve da 800K per la registrazione. Lire 272.500 Iva 9% e spese di spedizione comprese. 

GESTIONE APPUNTAMENTI - AP27/A72 

Gli appuntamenti vengono suddivisi per Clienti, Fornitori, Meeting interni all'ufficio e impegni personali. E' possibile ef¬ 
fettuare ricerche di appuntamenti nell'arco di un giorno, di una settimana, di un mese. Funziona con Mac 512K o Plus 
con doppio drive e ImageWriter. Lire 163.500 Iva 9% e spese di spedizione comprese. 

GESTIONE CONTABILITA' DOMESTICA - AP29/A81 

Per avere sempre sotto controllo l'andamento delle entrate e delle uscite tipiche di una contabilità domestica. A ma¬ 
no a mano che si caricano i i movimenti, vengono automaticamente aggiornati i totali Entrate, Uscite e Saldo; di que¬ 
st’ultimo è possibile la stampa dettagliata. Lire 119.900 Iva 9% e spese di spedizione comprese. 

GESTIONE BIBLIOTECHE - AP30/A87 

E' un'applicazione di elevata professionalità, che consente di tenere sotto controllo, oltre all'archivio aggiornato, an¬ 
che tutti i movimenti utente: prestiti, rese e così via. Basta richeidere un libro secondo una qualsiasi chiave per saper¬ 
ne la posizione e lo stato. Lire 119.900 Iva 9% e spese di spedizioni comprese. 

GESTIONE CONTO CORRENTE - AP31/A91 

E' un'applicazione indispensabile soprattutto per chi utilizza diversi conti in più banche. Gestisce tutti i dati anagrafici 
e tutte le operazioni. Calcola i saldi parziali e totali e consente la stampa dell'estratto conto. Lire 119.900 Iva 9% e 
spese di spedizioni comprese. 

RUNTIME OMNIS3 ■ AP27/A73 

Serve a utilizzare, tutte le applicazioni create con Omnis3. Lire 381.500 Iva 9% e spese di spedizioni comprese. 




Compilare e spedire il tagliando qui sotto a Applicando , Editronica srl, Corso Monforte 39, 20122 Milano 
Vogliate inviarmi i seguenti dischetti: 


N. 

| A | P 

1 1 l/l 1 1 1 

N. 

| A | P 

1 1 1/1 1 1 1 

N. 

]a|p; 

1 1 M 1 1 1 

N. 

|A|P| 

M/l 1 1 1 

N. 

|A| Pj 

IMII 

N. 

| A | P 

1 1/1 1 II 

N. 

|A|P] 

1 1/1 1 II 


Sono abbonato al Disk Service: si □ noQ 


..CAP. 

.Prov.. 


Cognome.Nome.. 

Via . 

Città. 

Scelgo la seguente formula di pagamento: 

I | allego assegno di L . non trasferibile intestato a Editronica Srl. 

□ allego ricevuta di versamento di L.sul cc/p n. 19740208 

intestato a Editronica srl, C.so Monforte 39, 20122 Milano. 

□ pago fin d'ora l'importo di L . con la mia carta di credito 

Bank am eri card N . scadenza. 

autorizzando la Banca d'America e dItalia ad addebitarne l'importo sul mio conto. 


Data . Firma .. 

O Desidero fattura. La mia partita Iva è: 







































Versatile. 

Ogni campo viene automatica- 
mente indicizzato, per cui è possi¬ 
bile effettuare ricerche per qual¬ 
siasi chiave: un set completo di 
criteri di selezione permette di tro¬ 
vare rapidamente tutto ciò che si 
desidera. 

Compatibile. 

E' possibile importare all'interno 
del database file di dati preesi¬ 
stenti che siano stati registrati nel 
formato ASCII o SYLK. E' ad e- 
sempio possibile recuperare ed 
usare con FileMaker Plus i dati già 
introdotti usando Microsoft File 
oppure Overvue. 

Sicuro. 

FileMaker Plus registra automati¬ 
camente i dati non appena que¬ 
sti vengono introdotti. C'è inoltre 
una funzione di recupero che gli 
consente di rigenerare i dati che 
si trovano su un file danneggiato. 


un foglio elettronico in miniatura. I 
campi riassunto permettono inve¬ 
ce di eseguire automaticamente 
calcoli su tutti i valori presenti nel 
database. 

Flessibile. 

L'introduzione dei dati avviene u- 
sando formati scheda interamen¬ 
te ridefinibili dall'utente: lo stile, le 
dimensioni dei caratteri, la dispo¬ 
sizione dei campi, tutto può esse¬ 
re ridefinito in modo da poter pre¬ 
sentare i dati nella forma deside¬ 
rata. 

E' possibile persino ridefinire com¬ 
pletamente il formato della pagi¬ 
na usata per stampare, stampa¬ 
re più records sulla stessa riga (eti¬ 
chette multiple), ecc. 

Relazionale. 

FileMaker Plus è un vero relaziona¬ 
le. Il numero di relazioni che è 
possbile impostare è illimitato. 


Vi presentiamo 
FileMaker Plus. 

Potente e versatile. 

Questo programma ha la capa¬ 
cità di archiviare dati di qualsiasi ti¬ 
po; riunisce tutte le migliori carat¬ 
teristiche dei programmi di archi¬ 
viazione attualmente esistenti sul 
mercato per Macintosh. 


Completo. 

Nella definizione dei files sono di¬ 
sponibili i seguenti formati per i 
campi: testo, numerico, data, im¬ 
magine, calcolo, riassunto. Infatti 
è possibile introdurre negli arichivi 
immagini di qualsiasi tipo importa¬ 
te usando gli appunti. 

Le possibilità offerte sui campi 
calcolati sono enormi; sono di¬ 
sponibili funzioni quali deviazione 
standard, valore futuro di un inve¬ 
stimento, funzioni logiche e tante 
altre: praticamente a disposizio¬ 
ne all'interno del database c’è 


Distribuito in esclusiva da: 

Corso Italia 149-34170 Gorizia - Telefono 0481 /30909 - 32790 


Disponibile negli Apple Center o per corrispondenza 

in versione italiana 


Configurazione: Prezzo: 

Macintosh 512/800, Plus, SE, II. 415.000 lire + iva. 





Microsoft 

Kjrammaperle^ 1 


Chiunque abbia dimestichezza con il Macintosh sa perfettamente che Microsoft Word è di gran lunga il mig] 


programma di elaborazione testi disponibile. 


Non è necessario, per apprezzare la potenza di Word, essere un romanziere alle prese con una storia di 400 pagine: è 


sufficiente non voler investire il proprio tempo su programmi meno efficienti e, oltretutto, più complicati da usare. 
Basta lavorare su più documenti contemporaneamente, componendo ad esempio una relazione con parti di altre già 
scritte in precedenza, oppure inviare una lettera circolare, combinando il testo con la lista degli indirizzi, o gestire, con 
una gamma impareggiabile di possibilità, una stampante laser. 

Per non parlare della possibilità di crearsi un Glossario, cioè un archivio di parole o frasi di uso ripetitivo, da richiamare 
con un solo tasto. 

Queste caratteristiche, e molte altre ancora, come la sua sorprendente semplicità di uso, fanno di Word la scelta per 


eccellenza per chi sappia di volere il meglio, e non esiti di fronte ad esso. 


Microsoft Word è disponibile presso tutti gli Apple Centers ed i Distributori Autorizzati Microsoft. 


MICROSOFT 

Potenza e semplicità. Insieme. 

MICROSOFT S.p.A. - 20093 Cotogno M. e (MI) - Via Michelangelo, 1 
tei. (02) 2549741 r.a. - fax (02) 2549745 


